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1.0 GENERAL INFORMATION 
1.1. PROGRAM ABSTRACT 


THIS DCLT (DATA COMMUNICATION LINK TEST) PROGRAM IS MEANT TO 
PROVIDE FIELD SERVICE WITH A TOOL TO MAINTAIN DPV-11 TO 
DPV-11 COMMUNICATION LINKS. THIS DCLT PROGRAM WILL PROVIDE 
THE COVERAGE NECESSARY TO DETECT FAILURES TO THE COMPUTER 
EQUIPMENT, THE COMMUNICATION LINK, OR THE MODEM. 


THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
RUNTIME SERVICES SOFTWARE (SUPERVISOR). THESE gp the Baw ed sag 


THIS PROGRAM CAN BE USED WITH XXDP+, ACT, APT, SLIDE AND PAPER 
TAPE. FOR A COMPLETE gy ptt be OF THE RUNT IME SERVICES, REFER 
TO THE XXDP+ USER'S MANUAL (CHQUS?.SEQ WHERE ? IS REV. LEVEL OF 
THE MANUAL). | THERE IS A BRIEF DESCRIPTION OF 

THE RUNTIME SERVICES IN SECTION 2 OF THIS DOCUMENT. 


IN ORDER TO RUN THE DPV DCLT PROGRAM, THE FOLLOWING 
MINIMUM HARDWARE IS REQUIRED: 


A LSI-11 

MINIMUM oF Oak WORDS OF MEMORY 

A WORKING CLOCK 

A CONSOLE TERMINAL 

ANY XXDP+ SUPPORTED LOAD MEDIA 

ONE JF THESE DPV-11 CONFIGURATIONS: 


DPv11-DB 
DPV11-DA 


1.2 SYSTEM REQUIREMENTS 


1.3. RELATED DOCUMENTS AND STANDARDS 


XXDP+ USER'S MANUAL (CHQUS?.SEQ WHERE ? IS THE REV. LEVEL OF 
THE MANUAL = "'C’’ IS THE CURRENT REV.). 
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1.4 DIAGNOSTIC HIERARCY PREREQUISITES 


THE GOAL OF THE DATA COMM. LINK TEST PROGRAM IS TO TEST THE 
COMMUNICATION LINK AND THEREFORE ASSUMES THAT THE CPU'S, 
Se a4 DvP=11'S AT EACH END OF THE LINK HAVE ALREADY 


IF A WORKING CLOCK IS NOT FOUND, THE PROGRAM WILL aa oY 

BUT ANY OF THE PROGRAM THAT TIMES THE DEVICE WILL HANG IF THE 
DEVICE TIMES OUT. ALSO, THE EVENT LOG WILL CONTAIN A ZERO EVENT 
TIME FOR ALL EVENTS LOGGED. 


IT IS NOT THE INTENTION OF A DATA COMM. LINK TEST PROGRAM TO 
TEST THE DPV-11°S, BUT TO TEST THE COMMUNICATION LINK TO 
WHICH THEY ARE CONNECTED. 


+4 lh DIAGNOSTICS THAT COULD BE RUN IF EITHER OF THE DPV~-11'S 
L 


CVDPVXX DPV-11 FCTNL DIAG 
CXDPVXX DPV-11 DECX MODULE 
XX= LATEST REVISION 


1.5 ASSUMPTIONS - RESTRICTIONS 


IT IS ASSUMED THAT THE COMMUNICATIONS DEVICE (A DPV-11) HAS 

BEEN TESTED USING THE PREREQUISTE DIAGNOSTICS. THE OPERATOR 
SHOULD HAVE READ THE USER DOCUMENTATION PORTION OF THE LISTING 

TO FAMILIARIZE HIMSELF WITH THE COMMANDS AND CAPABILITIES AVAILABLE 
UNDER THE DIAGNOSTIC SUPERVISOR AND DCLT. 


THIS DIAGNOSTIC DOES NOT RUN THE DPV IN BIT STUFF MODE 
IT IS ASSUMED THAT IF THE LINK WORKS IN CHAR MODE THE LINK 
WILL WORK IN BIT STUFF MODE. 


THE DPV11 IS NOT A DMA DEVICE AND THUS MUST RELY ON THE 
SOFTWARE FOR SERVICE. THEREFORE THIS DCLT WILL NOT RUN 
WITH THE DPV AT ITS HIGH CLOCK SPEED OF SOKHZ. 


eae ae ee ee eee eas 
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2.0 OPERATING INSTRUCTIONS 

THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES. 
FOR DETAILED INFORMATION, REFER TO THE XXDP+ USER'S MANUAL (CHQUS). 
2.1 COMMANDS 

THERE ARE ELEVEN LEGAL COMMANDS FOR.THE DIAGNOSTIC atest hs a 


(SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP+ USER'S MANUAL HAS MORE DETAILS. 


COMMAND EFFECT 

START START THE DIAGNOSTIC FROM AN INITIAL STATE 

RESTART START THE DIAGNOSTIC WITHOUT INITIALIZING 

CONT INUE CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER “C) 

PROCEED CONTINUE FROM AN ERROR HALT 

EXIT RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!) 

ADD ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE 
CONSIDERED TO BE ACTIVE AT START TIME 

DROP DEACTIVATE A UNIT 

PRINT PRINT STATISTICAL INFORMATION (IF IMPLEMENTED 
BY THE DIAGNOSTIC - SECTION 4.0) 

DISPLAY TYPE A LIST OF ALL DEVICE INFORMATION 

FLAGS TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3) 

ZFLAGS CLEAR ALL FLAGS (SEE SECTION 2.3) 


A COMMAND CAN BE RECOGNIZED BY THE FIRST THREE — so 
YOU MAY, FOR EXAMPLE, TYPE ‘'STA’' INSTEAD OF ‘'STAR 


2.2 SWITCHES 


THERE ARE SEVERAL SWITCHES WH CH ARE USED TO MODIFY ees te OPERATION. 


THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH 
IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY “DDDDD'*. 


SWITCH EFFECT 
/TESTS:LIST EXECUTE ONLY THOSE TESTS SPECIFIED IN 
THE LIST. LIST IS A STRING OF TEST 
NUMBER S, FOR EXAMPLE - /TESTS:1:5:7-10, 
THIS LIST WILL CAUSE TESTS 1,5.7,8,9,.10 TO 
BE RUN. ALL OTHER TESTS WILL NOT BE RUN. 
/PASS : DDDDD EXECUTE DDDDD PASSES (DDDDD = 1? TO 64000) 
/FLAGS:FLGS SET SPECIFIED FLAGS. FLAGS ARE DESCRIBED 
IN SECTION 2.3. 
/EOP: DDDDD REPORT END OF PASS MESSAGE AFTER EVERY 
DDDDD PASSES ONLY. (DDDDD = 1 TO 64000) 
/UNITS:LIST TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED 
IN THE LIST. LIST EXAMPLE ~ /UNITS:0:5:10-12 
USE UNITS 0,5,10,11,12 (UNIT NUMBERS = 0-63) 


SEQ 0007 
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EXAMPLE OF SWITCH USAGE: 

START/TESTS: 1=5/PASS: 1000/E0P: 100 
THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGH 5 WILL BE 
EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3) T'41E END OF 
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY. A 
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. YOU MAY, 
FOR EXAMPLE, TYPE ‘'/TES:1-5'' INSTEAD OF ''/TESTS:1-5"". 


BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH 
COMMAND . 


TESTS PASS FLAGS EOP UNITS 


2.3 FLAGS 
FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 


LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 


CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS 

ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR 

ALL FLAGS. WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS, 
NO COMMANDS AFFECT THE STATE OF THE FLAGS; THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 


FLAG EFFECT 

HALT ON ERROR - CONTROL IS RETURNED TO 
RUNTIME SERVICES COMMAND MODE 

LOOP ON ERROR 

INHIBIT ALL ERROR REPORTS 

INHIBIT ALL ERROR REPORTS EXCEPT 
FIRST LEVEL (FIRST LEVEL CONTAINS 
ERROR TYPE, NUMBER, PC, TEST AND UNIT) 
INHIBIT EXTENDED ERROR arene (THOSE 
CALLED BY PRINTX MACRO'S) 

DIRECT MESSAGES TO LINE PRINTER 

PRINT TEST NUMBER AS TEST EXECUTES 
“BELL’* ON ERROR 


UNATTENDED MODE (NO MANUAL INTERVENTION) 
INHIBIT STATISTICAL REPORTS (DOES NOT 


SEQ 0008 
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APPLY TO ST tat tn — DO NOT SUPPORT 
STATISTICAL REPORT! 


IDR INHIBIT PROGRAM BROPPING OF UNITS 

ADR EXECUTE AUTODROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 


HAVE EVALUATION SUPPORT) 
*ERROR MESSAGES ARE DESCRIBED IN SECTION 3.1 


SEE THE XXDP+ USER'S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY 
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH. FOR EXAMPLE, 
TO CAUSE THE PROGRAM TO LOOP ON ERROR, INHIBIT ERROR REPORTS 
AND TYPE A ‘BELL*’ ON ERROR, YOU MAY USE THE FOLLOWING STRING: 


/FLAGS:LOE: IER:BOE 


2.4 HARDWARE QUESTIONS 


WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT 
THE USER FOR HARDWARE INFORMATION BY TYPING '‘CHANGE HW (L) 2°" 
YOU MUST ANSWER ‘'Y’' AFTER A START COMMAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN t PRELOADED'™ USING THE SETUP UTILITY (SEE 
CHAPTER 6 OF THE XXDP+ USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A ‘'Y'', THE RUNTIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS (IN DECIMAL). 


THE DPV-11 DATA COMM. LINK TEST PROGRAM WILL NOT USE MORE THAN 
aA hy FOR THE DPV-11 , THE HARDWARE INFORMATION REQUESTED 
WIL t 


# UNITS (D) ? 1<CR> 


UNIT 0 

FULL DUPLEX OPERATION : (L) Y ? 

DPV CSR ADDRESS : (0) 160170 ? 
INTERRUPT VECTOR Spares: (oO) 300 ? 
REMOTE NODE ‘‘ITEP"’ (L) N ? 


THE FULL DUPLEX QUESTION SHOULD BE ANSWERED ‘’Y'’ WHEN USING 
FULL DUPLEX MODEMS,OR NULL MODEM, OR MODEM ELIMINATORS. 
ANSWER ‘N’’ FOR HALF DUPLEX MODEMS. 


REMOTE NODE ITEP SHOULD BE ANSWERED ‘'Y’* IF OTHER NODE 
IS RUNNING SOFTWARE THAT IS USING “‘ITEP’’ FORMATS(I.E. 
COMM TURNARROUND SYSTEM OR PDP=-11 RUNNING ITEP). 


SEQ 0009 
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2.5 DATA COMM. LINK TEST COMMANDS 


THE ‘DCLT>'' COMMAND LEVEL FOLLOWS THE ANSWERING OF THE HARDWARE P-TABLE 
pag he Fe THESE COMMANDS CAN BE TYPED WHEN THE ‘DCLT> (A) ?°' PROMPT 


MESSAGE COMMANDS AVAILABLE: 


YOU ONLY HAVE TO TYPE ENOUGH CHARACTERS TO UNIQUELY SPECIFY A COMMAND. 


THE COMMAND LINE IS INTERPRETED FROM LEFT TO RIGHT. THEREFORE, 
IF A QUALIFIER ne THE COMMAND LINE IS RELATED OR EFFECTS A QUALIFIER 
TO THE LEFT ON THE COMMAND LINE, THE QUALIFIER FARTHEREST TO THE RIGHT 
TAKES PRECEDENCE SINCE IT IS INTERPRETED LAST. (1.£. IF /CHECK..... 

. - -/NOCHE CK ~ Ng ON THE SAME LINE, NOCHECK WILL BE INDICATED IN THE 
PARAMETERS WORD. ) 


REFER TO SECTION 6.0 FOR A DESCRIPTION OF THE DIFFERENT MODES OF 
OPERATION AND THE TYPES OF MESSAGES AVAILABLE. 


2.5.1 MESSAGE COMMANDS 


COMMAND DESCRIPTION 
CLEAR EXPECTLIST ZEROES THE EXPECTLIST (00°S) 
AND THEN PUTS DEFAULT ITEP MSG 


IN SO NOT REALLY EMPTY 
CLEAR TRANSMITLIST oy TRANSMITLIST (000°S) 


THEN PUTS DEFAULT ITEP MSG 
IN SO NOT REALLY EMPTY 


SET EXPEC TMSG=T YPE /QUAL DEFINE A MESSAGE TO BE PUT ON 
THE EXPECTED LIST 
WHERE : hen, IS: 


=ALPHA 
=""A-Z,0-9,SPACES OR TABS IN QUOTES*’ 
WHERE THE OPTIONAL *‘QUAL"’ IS: 








a - 
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MAKE THE MESSAGE ‘NNN"* BYTES 


LONG. (DEFAULT VALUE IS 
SIZE OF MESSAGE SPEC'D BY 
OPERATOR OR DEFAULTS.) 

COPY ae MESSAGE INTO THE 
BUFFER ‘'NN’* TIMES (DEFAULT 
IS 0 = PUT THE MESSAGE IN 
ONLY ONCE) 


FIRST SET 


DECIMAL NUMBER 
OVERWRITES THE DEFAULT ITEP MESSAGE PLACED THERE BY 
LEAR’’ COMMAND. 


INITIALIZATION OR A ° 


SEE SECTION 6.2 FOR A DESCRIPTION OF THE a 
MESSAGES THAT ARE AVAILABLE. (ZEROS,ONES ...) 


SET TRANSM] TMSG=T YPE / QUAL 


SET EXPECT=TRANSM] T 


SHOW EXPECTLIST 


SHOW TRANSMITLIST 


2.5.2 STATISTICAL COMMANDS 


DUMP SSSSSS~EEEEEE/B 


WHERE *'/B** IS OPTIONAL: 
DEFAULT IS PRINT WORDS 
*'/B'* CAUSES PRINT BYTES 





DEFINE A MESSAGE TO BE PUT ON 
THE TRANSMIT LIST 
(SEE DESCRIPT FOR SET EXP) 


MAKES A COPY OF THE TRANSMIT 
LIST IN THE EXPECT LIST. 


LISTS THE MESSAGE SIZE AND TYPE 
FOR THE MESSAGES IN THE 
EXPECT LIST 


LISTS THE MESSAGE SIZE AND TYPE 
FOR THE MESSAGES IN THE 
TRANSMIT LIST 


DESCRIPTION 


TAKES THE OPERATOR TO THE 
REPORT LEVEL *RPT>*. FROM 
HERE YOU CAN EXAMINE THE 
EVENT LOG. 


PRINTS THE CONTENTS OF THE 
MEMORY LOCATIONS BETWEEN 
OCTAL ADDRESSES. **SSSSSS*" AND 
“EEEEEE’’ WHERE ‘‘SSSSSS"’ IS 

THE START ADDRESS AND 
"-EEEEE'’ IS THE END ADDRESS. 


IF ‘'EEEEEE’’ IS NOT SPECIFIED 
THEN THE CONTENTS e tS call 
1S PRINTED IN WORD F 


3EQ 0011 


| 
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IS PRINTED IN WORD FORMAT. 


NOTE: THE DUMP COMMAND IS USEFUL FOR EXAMINING 
MESSAGE DATA. STARTING ADDRESSES CAN 
BE FOUND BY LOOKING IN THE EVENT LOG. 


2.5.3 RUN COMMAND 


COMMAND DESCRIPTION 


RUN MODE=MTYPE/QUAL STARTS DCLT EXECUTING IN THE 
MODE SPECIFIED 


NOTE: MODE=ACTIVE IS NOT DEFAULT, A MODE=MTYPE MUST BE TYPED 
----- EACH TIME A RUN IS TYPED 


WHERE THE "MTYPE'’ IS ANY ONE OF THE FOLLOWING: 
=ACTIVE (FORCES /NOECHO ,NO LOOPING) 


=PASSIVE (FORCES NO LOOPING) 

=RECEIVE (FORCES /NOECHO ,NO LOOPING) 

=LISTEW (FORCES /NOECHO ,NO LOOPING, /NOCHECK) 
=TRANSMIT (FORCES /NOECHO ,NO LOOPING, /NOCHECK) 
=TALK (FORCES /NOECHO ,NO LOOPING, /NOCHECK) 


=DOWNILINELOAD (DOWN-LINE-LOADING IS NOT SUPPORTED 
FOR DPV-11 TO DPV-11 LINKS). 


(FORCING NO LOOPING MEANS IT MUST BE 
SPECIFIED AS A QUALIFIER ANY TIME ITS 
DESIRED, THERE IS NO DEFAULT) 


AND OPTIONAL ‘‘QUAL"’ IS ANY COMBINATION OF THE FOLLOWING: 


/ CHE CK/NOCHE CK ENABLES/DISABLES CHECKING OF RECEIVED 
DATA AGAINST THE EXPECTED DATA 


NOTE: IF BOTH NODES IN ACTIVE AND ‘'/NOCHECK’’ IS USED, 

~---- END-OF-PASS IS DEFINED AS RECEIVING 1 MESSAGE 
AND COMPLETING THE TRANSMIT LIST. WITH NO DATA 
CHECKING, THERE IS NO WAY FOR DCLT TO KNOW HOW 
MANY MESSAGES IT SHOULD EXPECT TO RECEIVE. 


/STATUS/NOS TATUS wary gt greet: PRINTING OF PROGRAM 


STATUS 
/ECHO/NOE CHO ENABLES/DISABLES THE RETRANSMISSION OF 
THE DATA RECEIVED IN PASSIVE MODE. 
(IGNORED IN MODES OTHER THAN PASSIVE) 
/MODEM/NOMODEM/ BALES /BISI ES IS CHANGES. OF MODEM STATUS 


IN 
/LOOP=L TYPE SPECIFIES WHICH, IF ANY, TYPE OF 
MAINTENANCE LOOPBACK os BEING USED. 





SEQ 0012 
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(IGNORED IN MODES OTHER THAN tie 
MUST BE SPECIFIED EACH TIME ELSE NO 


LOOP IS USED. 
“LTYPE’' IS: 
=INTERNALTTL LOOPS DATA INTERNAL TC USYNRT ’ 
=CABLE USE THIS FOR TESTING WITH H3260 


OR H3259 TURNARROUND CONNECTOR 


NOTE: THIS SKIPS OVER THE CHECK 
FOR MODEM READY WHEN DTR IS SET. 


t 
=LOCALMODEM *) bom USED BY DPV 


=REMOTEMODEM - 
/PASS=NN SPECIFIES NUMBER OF ITERATIONS TO MAKE BEFORE 
ND-OF=PASS. DEFAULT VALUE OF 
r WILL BE USED ON ANY RUN THAT A /PASS=N 
ae 1S NOT. ADDED TO. THE “RUN ..."" COMMAND. 
| IF A '=1'' IS TYPED, THEN THE PROGRAM 
p RUN UNTIL A *C IS TYPED. 
NOTE: SEE SECTION 6.1 FOR A DESCRIPTION 
=---- OF THE "RUN MODES'' "LOOP MODES’ 


2.5.4 DEFAULTS 


IF NO *’SET'S** THEN THE DEFAULT IS SAME AS IF TYPED: 
SET TRANSMI TMSG=] TEP/S1ZE=58/COPY=0 
SET EXPEC TMSG=] TEP/S1IZE=58/COPY=0 


THE DEFAULT COPY AND SIZE FOR EACH OF THE MESSAGE TYPES: 
ONES ~ /SIZE=64/COPY=0 
ZEROES - /SIZE=64/COPY=0 
OALT = /SIZE=64/COPY=0 
1ALT_- /SI1ZE=64/COPY=0 
CCITT = /SIZE=64/COPY=0 
ALPHA = /S 17£=65/COPY=0 
A ~ /SIZE= 58/COPY=0 
. SPEC'D = /SIZE=LENGTH-OF -TEXT-TYPED~BE TWEEN-QUOTES/COPY=0 


FOR THE RUN COMMAND THE DEFAULTS ARE: 
RUN MODE=ACTIVE/NOSTATUS/ CHE CK/NOE CHO/NOMODEM/PASS=1 


NOTE: MODE=ACTIVE IS NOT DEFAULT, A MODE=MTYPE MUST BE TYPED 
weee= EACH TIME A RUN IS TYPED 


--— = 
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IF THE DCLT PROGRAM IS RUN IN UNATTENDED MODE (UAM FLAG=1 OR CHAINED), 
THE DEFAULTS ARE AS IF THESE SETUP AND RUN “OMMANDS WERE TYPED: 


SET TRANS=ITEP 
SET EXPECT=ITEP 
RUN MODE=ACTIVE/LOOP= INTERNAL /NOSTAT/NOE CHO/NOMODEM/ CHE CK/PASS=1 


OTHER NOTES: 

“~~ ALWAYS RETURNS YOU TO ‘DR>'’ (THE SUPERVISOR) 
<CR> IS SEEN AS_A COMMAND TERMINATOR 

**RUBOUT"’ DELETE LAST CHAR. TYPED IN COMMAND STRING 


2.5.5 PRINT COMMAND 


THE PRINT COMMAND TAKES YOU TO THE —— LEVEL ‘RPT>*. 
THE COMMANDS AVAILABLE IN RPT> ARE 


COMMAND DESCRIPTION 

HELP OR ? PRINTS HELP INFORMATION FOR RPT> 

EXIT RETURNS YOU TO THE LEVEL THAT YOU 
ENTERED FROM. (DCLT> OR DR>) 

LOG PRINTS THE DCLT EVENT LOG 


NOTE: AT SOME FUTURE DATE WHEN DDCMP PROTOCOL IS 
SUPPORTED BY THIS DCLT PROGRAM, A COMMAND 
WILL BE ADDED TO EXAMINE ERROR COUNTERS. 


2.5.6 MISC COMMANDS 


COMMAND S DESCRIPTION 


EXIT FROM THE DCLT> LEVEL RETURNS YOU 
TO DR> 


HELP OR ? PRINTS HELP INFORMATION 
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2.6 QUICK START-UP PROCEDURE (XXDP+) 
TO START=UP THIS PROGRAM: 
1. BOOT XxDiP°+ 


2. GIVE THE DATE AND ANSWER THE LSI AND S5OHZ (IF THERE 
1S A CLOCK) QUESTIONS 


3. TYPE "R NAME'', WHERE NAME IS THE NAME OF THE BIN OR BIC 
FILE FOR THIS PROGRAM 


4. TYPE ‘‘START’’ 
5. ANSWER THE ‘'CHANGE HW’* QUESTION WITH ‘'Y"’ 
6. ANSWER ALL THE HARDWARE QUESTIONS. THE NUMBER OF UNITS 
THAT CAN DCLT CAN USE iS ALWAYS ‘'I''. 
WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE 
DEFAULTS FOR FLAGS. THESE DEFAULTS ARE DESCRIBED IN SECTION 2.3. 


7. AFTER THE ‘DCLT> (A) ?°* PROMPT, TYPE 
"RUN MODE=ACTIVE<CR>"* 


WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING THE DEFAULT TRANSMIT 
AND EXPECTED MESSAGES. THE DEFAULT PASS COUNT AND ‘RUN’ QUALIFIERS 
ARE ALSO BEING USED. THESE DEFAULTS ARE DESCRIBED IN SECTION 2.5.3. 





SEQ 0015 
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3.0 ERROR INFORMATION 
3.1 TYPES OF ERROR MESSAGES 


THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 

A DIAGNOSTIC: GENERAL, BASIC AND EX Uys GENERAL ERROR MESSAGES 
ARE ALWAYS PRINTED UNLESS THE ‘‘IER'’ FLAG IS SET (SECTION 2.3). 

THE GENERAL ERROR MESSAGE IS OF THE FORM: 


NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC :XXXXXX 
ERROR MESSAGE 


»WHERE; NAME = DIAGNOSTIC NAME 
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT) 
NUMBER = ERROR NUMBER 
UNIT NUMBER = ve - N (N_IS LAST UNIT IN PTABLE) 
TST NUMBER = T AND SUBTEST WHERE ERROR OCCURRED 
PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL 


BASIC ERROR A tap pg ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 
THE ‘"IER’’ OR “‘IBE'' FLAGS ARE SET (SECTION 2.3). THESE MESSAGES 
ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 


EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 
SUCH AS ey ge CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAYS 


PRINTED UNLESS THE ‘‘IER'', “‘IBE'’ OR ‘'IXE'’ FLAGS ARE SET (SECTION 2.3). 


THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 


3.2 SPECIFIC ERROR MESSAGES 


3.2.1 COMMAND LINE INTERPRETER ERRORS 


ERROR MESSAGE : MEANING 
?ILL CMD-BAD SYNTX? A_ COMMAND WITH AN ILLEGAL CHAR WAS 
TYPED = RETYPE poe C TH 


OMMAND. THE 
VALID COMMANDS AND THEIR SYNTAX ARE 
SHOWN IN SECTION 2.5. 


2INCMPLTE CMD? — PART OF A COMMAND WAS LEFT 
?NUM TOO BIG? THE VALUE OF A NUMERIC STRING IN THE 

COMMAND LINE WAS LARGER THAN 65535 
OR 177777 OCTAL. ( > 16 BITS). 


?BAD RADIX? A *'8"' OR *9"* WAS TYPED WHEN AN OCTAL 


STRING WAS wey » poe aaa 


WHEN TYPING A OMMAND 
OCTAL ADDRESSES ARE EXPECTED. 


SEQ 0016 
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?"LOOP’* VALID ONLY IN ACTIVE? THE ‘‘/LOOP=..°' SWITCH WAS TYPED IN A 
RUN COMMAND BUT THE MODE WAS NOT SET 
TO ACTIVE. MAINTENANCE LOOP IS ONLY 
ie IF THE MODE OF OPERATION IS 


?"ECHO"" VALID ONLY IN PASSIVE? . ""ZECHO'' SWITCH WAS TYPED IN A 
UN COMMAND BUT THE MODE WAS NOT SET 
70 0 PASSIVE. ECHOING OF RECEIVED DATA 
IS ONLY POSSIBLE IF THE MODE OF 
OPERATION IS PASSIVE. 


2ILL CHR= *'A=Z,0-9,SP,TAB'’ ONLY? A CHARACTER TYPED WITHIN QUOTES WHEN 
TRYING TO DEFINE THE CONTENTS OF A 
TRANSMIT OR EXPECT MESSAGE WAS NOT 
A '‘A-Z,0-9,SPACE OR TAB’. RETYPE THE 
COMMAND WITH ONLY THESE CHARACTERS 
BETWEEN QUOTES. 


?"'SIZE=0"' NOT VALID? A MESSAGE ZERO A LONG CAN NOT BE 
Ruy: RETYPE THE COMMAND WITH A 
7SIZE=NNN'’, _IF NO ''/SIZE="" IS TYPED 
A DEFAULT SIZE WILL BE USED. 


? TRANSMIT AND EXPECT LIST MUST BE IDENTICAL FOR LOOP? 


IF RUN COMMAND WITH ''/LOOP/CH’' IS TYPED 
THE TRANSMIT LIST AND EXPECT LIST MUST 
BE EQUAL. IF THEY ARE NOT THIS ERROR 
WILL BE DISPLAYED. USE ‘SE E=T* COMMAND. 


3.2.2 DCLT OR DEVICE ERROR MESSAGES: 


CLOCK NOT FOUND THIS MEANS THAT NO CLOCK WAS 
FOUND ON THE SYSTEM THE DIAG- 
NOSTIC WILL STILL RUN BUT NONE 
Aa TIME OUT CONDITIONS WILL 


BAD CLOCK = PROGRAM WILL HANG ON ‘‘TIMEQUT**!! 
THIS MEANS THAT THE CLOCK FOUND 
ON _THE SYSTEM DID NOT INTERRUPT 
WHEN ASKED TO DO A ‘'TICK"’. 


THE PROGRAM WILL STILL RUN, BUT ANY 
OF THE PROGRAM THAT TIMES THE DEVICE 
WILL HANG IF THE DEVICE 7s rs 
ALSO, THE EVENT LOG WILL CONTAIN 

ZERO EVENT TIME FOR ALL EVENTS LUGGED. 


MAX. CHAR. MSG COUNT EXCEEDED - MSG. NOT BUILT !! 
THIS MEANS THAT THE TRANSMIT OR EXPECT 
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BUFFER FULL = MSG. NOT BUILT !! 
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BUFFER _IS FULL. NO MORE MESSAGES CAN BE 
ADDED TO THAT BUFFER. 


THIS MEANS THAT THE LAST MESSAGE YOU 
TRIED TO ADD TO EITHER THE TRANSMIT OR 


MESSAGE 
THE LIMIT IS DETERMINED BY THE SIZE OF 
THE MESSAGE POINTER TABLE. 


CHAR. COUNT EXCEEDS BUFF LIMIT = MSG TRUNCATED 


3.2.3 DEVICE ERROR MESSAGE 


DATA ge tye bee DATA ERROR 
BYTE # IN MSG=XXX  EXPTD=YYY 


g 
| 
OF THE OR 
SAGE 
Z — 
UP 
E 
NUMBE 
) OR. 
D “DUMP** C 
NE IT. 
DATA COMPARISON DATA ey 
TOTAL MISMATCHES IN MSG = 
DATA COMPARISON LENGTH ERROR 


THIS MEANS THAT THE LAST MESSAGE YOU 
TRIED TO ADD TO THE TRANSMIT OR EXPECT 
aero CAUSED THE TOTAL CHAR. COUNT 
FOR THAT BUFFER 10 EXCEED THE LIMIT. 

THE MESSAGE WAS TRUNCATED TO COMPLETELY 
FILL THE BUFFER. NO MORE MESSAGES CAN 
BE ADDED TO THAT BUFFER. 


RECVD=222 


XXX= OFFSET OF THAT BYTE FROM THE START 
COMPARE EXPECT MESSAGE. 
YYY= THE CONTENTS OF THAT BYTE IN THE 
EXPECTED MES 
ZZ= THE CONTENTS OF THAT BYTE IN THE 
RECEIVED MESSAGE 


TO FIVE OF THESE ERRORS WILL BE 
PRINTED PER MESSAGE COMPARED. ONLY 
THE FIRST FIVE MISMATCHES WILL BE 
INDIVIDUALLY REPORTED, BUT TOTAL 

R OF MISTMATCHES IS REPORTED 
BY ANOTHER ERR 


PRINTING THE EVENT LOG AND USING THE 
CLT OMMAND WILL ALLOW YOU TO 
ne OF THE MESSAGE AND 


THIS MEANS THAT WHEN THE MESSAGE 
RECEIVED WAS COMPARED AGAINST THE 
MESSAGE THAT WAS EXPECTED, SOME OF 
THE CHARS, WERE NOT THE SAME. 


SEQ 0018 
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COMPARE COUNT= XXX RECEIVE COUNT= 222 
XXX= NUMBER OF BYTES IN THE COMPARE 
ME SSAGE 
77Z= NUMBER OF BYTES IN THE RECEIVED 
ESSAG 


| 

| M 
THIS MEANS THAT THE MESSAGE RECEIVED 
WAS A DIFFENT LENGTH THEN THE MESSAGE 
THAT WAS EXPECTED. 


MODEM STATUS CHANGES FOR THIS PASS WERE.. 
HARD CHANGES=XXXXX GLI TCHES=XXXXX 


WHERE XXXXX IS A 5 DIGIT DECIMAL NUMBER 
THIS MSG IS ONLY PRINTED IF NUMBER OF 
EITHER HARD CHANGES OR GLITCHES IS 
GREATER THAN 0. A HARD CHANGE IS ONE 
WHERE THE DPV WAS ABLE TO LATCH ' A 
DIFFERENCE IN THE MODEM STATUS. 

GLITCH IS WHEN A MODEM STATUS inTeRmver 
OCCURS BUT THE DPV CANNOT FIND A 
DIFFERENCE IN STATUS BIT. 


Rae KEE 


* NOTE * = IN THE FOLLOWING ERROR DESCRIPTIONS XXXXX 
eeeeceer REFERS TO THE bee CONTENTS OF THE DEVICE REGISTERS 


SPECIFIED 
MASTER RESET DID NOT WORK THIS MEANS THAT AFTER A MASTER 
RXCSR TXCSR RESET WAS ISSUED TO DPV_THE 
XXXAK XXXXAKK RXCSR REGSITER WAS NON ZERO. 
NO CLEAR TO SEND FROM MODEM WHEN REQUEST TO SEND SIGNAL 
RXCSR TXCSR IS SET MODEM DOES NOT RESPOND 
KXKKK KK XXXKAXAX WITH CLEAR TO SEND 
haa OUT satmiideaion™ FOR RX OR TX TO COMPLETE 

RXCSR TXCSR DEVICE TIMED OUT AFTER 
MXXKAKK XXX WAITNG FOR A RECIEVER OR 
TRANSMITTER TO COMPLETE 

MODEM DID NOT RETURN MODEM READY 
RXCSR TXCSR MODEM DID NOT RESPOND WITH MR. 
XXKKAKK MAXX 
CRC_IN ERROR THE CRC ERROR BIT IS CLEAR 
RDSR RXCSR AT TIME THAT IT SHOULD BE SET 
XXXKAX XXX 
RECEIVER OVERRUN RECIEVER DETECTED AN OVERRUN 
RDSR RXCSR 
KXKKKKK JOO 


TIMED OUT IN START,STACK ACK SEQ THIS ERROR OCCURS WHEN IN THE 








—_—__—_---—- 
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} 
PROGRAM | 
IT SHOULD ALSO BE NOTE 
QUEUED : 
aol 
OTAL NO. 
EVENT TI 
TOTAL 
443 
TOTAL 
EVE 


RDATA SDATA DEVICE INIT ROUTINE A TIME OUT 
XX KKK XXXXAXX OCCURS WHILE TRYING TO DO START 
STACK ACK START UP SEQUENCE. 
THE VALUES IN RDATA AND SDATA 
INDICATE THE LAST CONTROL CHAR 
oF ptm AND TRANSMITTED 


4.0 PERFORMANCE AND PROGRESS REPORTS 


DCLT USES IT'S OWN METHOD FOR DETERMINING AN ‘END OF PASS** 

WHICH IS CALLED A ‘DCLT END OF PASS*'. THE NUMBER OF a 18 aad 
TO BE RUN IS SPECIFIED BY THE *'‘/PASS=XXX'" SWITCH ON THE D 

RUN COMMAND. THE TOTAL NUMBER OF ‘DCLT ERRORS'’ IS REPORTED. 

WHEN ‘’ X NUMBER OF DCLT PASSES*’ ARE COMPLETED. 


4.1 PRINTING OF EVENT LOG 


SIGNIFICANT EVENTS OR C:‘CCK=POINTS WILL BE LOGGED IN A 

*“CIRCULAR UE** STORAGE AREA CALLED THE EVENT LOG. THE LAST 

"N'’ EVENTS ARE KEPT sings 2 AND CAN = other teen ON THE OPERATORS 

ee BY GIVING A ‘PRINT’’ COMMAND AT THE ‘DR>''(DIAGNOSTIC SUPERVISOR) 
"DCLT>"* DCL T) LEVEL. THIS WILL TAKE YOU TO THE RPT> LEVEL. NOW 

INPUT T .0G’* COMMAND. THE EVENTS ARE PRINTED IN A ‘LAST=IN 

FIRST-OUT’* ORDER. 


EVENT TIME IS TYPED OUT AS MMM:SS:TT (LIKE 254:36:07) WHERE MMM,SS,TT 
REPRESENT THE NUMBER OF MINUTES, SECONDS, CLOCK TICKS SINCE THE LAST 
START OR RESTART. IT SHOULD SE NOTED THAT THE TIMES ARE 

RELATIVE SINCE WHILE THE PROCESSOR IS RUNNING AT PRIORITY 7 

THE CLICK CAN'T INTERRUPT TO KEEP _TIME. eae IS THE CASE 

WHILE THE S AU DCLT COMMANDS FROM THE OPERATOR. 

TED THAT THERE ARE ONLY 8 BITS AVALIABLE TO STORE 
RELATIVE MINUTES SO ‘TIME’ WILL WRAP TO 000:00:00 AFTER 256:59:59. 


A START OR RESTART COMMAND AT THE ‘DR>"’ LF vet INITIALIZES THE EVENT 
LOG. THEREFORE IT IS WISE TO DO A * sameaell T THE ‘DR>’* LEVEL 
BEFORE GIVING A “‘START’’ OR RESTART’ 


THE TYPES OF EVENTS KEPT IN THE EVENT LOG ARE: 


TRANSMIT ss 
TIME, ADDRESS OF 1ST BYTE OF MESSAGE, 
OF BYTES, MODEM STATUS AT THAT TIME. 
TRANSMIT IPESSAGE COMPLETED: 
ME, ADDRESS OF 1ST BYTE OF MESSAGE, 
NO. OF BYTES, MODEM STATUS AT THAT TIME, 
RECEIVE SPACE QUEUED: 
VENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE, 
NO. OF BYTES, MODEM STATUS AT THAT TIME. 


RECEIVE MESSAGE COMPLETED: : 


NT TIME, ADDRESS OF 1ST BYTE OF MESSAGE, 


SEQ 0020 
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TOTAL NO. OF BYTES, MODEM STATUS AT THAT TIME. 
DATA sage S STARTED: 
EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED Page 
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF BYTES 
IN EXPECT MSG. 
DATA a DATA ERROR: 
EVENT TIME, a ty OF 1ST BYTE OF RECEIVED MSs., 
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF 
COMPAR I SON FAILURES 
DATA COMPARISON LENGTH ERROR: 
EVENT TIME, ADDRESS OF 1ST BYTE OF yg Sg MSG., 
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF BYTES 
YAND. SETUP 


IN ° 
DEVICE INIT AND SETUP: 
t po TIME, MODE OF OPERATION, TYPE OF MAINTENANCE 
. DCLT’' PASS COUNT, ‘RUN’ PARAMETERS 
DEVICE ERROR! 


| 
| 
} 
| 
| 
EVENT TIME, DEVICE ERROR MESSAGE, CONTENTS OF TWO 
REGISTERS RELATING TO THE ERROR. 
END OF PASS 
EVENT TIME, ‘DCLT’* PASS COUNT, “DCLT’* ERROR COUNT, 
AND THE "'STRT-TO'(COUNT OF START TIME OUTS). 


4.2 OPERATOR STATUS MESSAGES 


THE *'/STATUS, /NOSTATUS*’ QULAIFIERS FOR THE DCLT ‘'RUN'’ COMMAND 
Cay t hype THE PRINTING OF PROGRAM STATUS MESSAGES TO THE 


OPE 
THE DCLT PROGRAM IS CURRENTLY DOING. BELOW ARE THE MESSAGES THAT 
MIGHT BE PRINTED AND THEIR MEANING: 


TxXQ DEVICE IS ABOUT START TRANSMITING A MESSAGE 

TXC TRANSMISSION OF MESSAGE COMPLETED 

RxQ DEVICE HAS QUEUED SPACE TO RECEIVE/ COMPLETED RECEIVE 
ERR DEVICE ERROR HAS OCCURRED 

INI DEVICE ABOUT TO BE INITIALIZED 

MSC ABNORMAL MODEM STATUS CHANGE 

CMP ABOUT TO DO DATA CHECKING OF RECVD VS. EXPTD DATA 
CML LENGTH ERROR oh ae DURING DATA COMPARISON 

CMD DATA ERROR OCCURRED DURING DATA COMPARISON 

EOP END OF PASS 


SEQ 0021 
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| 
ra 5.0 DEVICE INFORMATION TABLES 

THIS IS THE DEFAULT HAPDWARE P=-TABLE. THE VALUES AND 
SIZE ARE USED AS A ‘‘TEMPLATE'' FOR CREATING ACTUAL P=TABLE 


ENTRIES AND THE DEFAULT VALUES PROVIDED FOR THE OPERATOR. 
SEE SECTION 2.4 FOR AN EXAMPLE OF THE HARDWARE QUESTIONS. 


THE NUMBERS IN BRACKETS ( I.€. (103) INDICATES THE OFFSET OF THE 
WORD INTO THE HARDWARE PATABLE. THE OFFSETS MUST MATCH THE P-TABLE 
OFFSETS USED IN THE HARDWARE PARAMETER CODING SECTION WHERE T THE 
“GET PARAMETER’ CALLS ARE USED TO FILL THE P-TABLE. 


-WORD 1 (0) FULL OR HALF DUPLEX FLAG (BITO=1 IF FULL) 
-WORD 160170 C2] CSR ADDRESS 

-WORD 300 304] INTERRUPT VECTOR 

-WORD 240 306J_ SPARE 

-WORD 0 3010] a | 

-WORD 0 C12] S 

-WORD 0 3014] REMOTE NODE ‘'ITEP*’ 


6.0 MODE AND MESSAGE DESCRIPTIONS 


6.1 MODE DESCRIPTIONS 


THE FOLLOWING MODE DESCRIPTIONS REFER TO MESSAGE LISTS BEING 
TRANSMITTED ag Bt hae 1 AWARE THA An! — DATA_IS ALSO 


HARS ; SOH 

OCTAL’001;2 BYTES OF CRC; THE MESSAGE BODY; 2BYTES OF CRC. 

IF REMJTE NODE ITEP QUESTION IS ANSWERED Y THEN SYNC CHAR WILL 
BE OCTAL 26 INSTEAD OF 226;NO SOH,BYTE COUNT OR HEADER DATA WILL 
BE SENT. ON FULL DUPLEX LINKS A START STACK ACK SEQ WILL BE SENT 
ONCE AT INIT bes FOR EACH MODE. THIS SEQUENCE CONTAINS CONTROL 
MESSAGES WHOSE FORMAT IS ..8 SYNC CHAR, 1BYTE ENQ(005),START 
STACK OR ACK,3 BYTES OF 001, AND 2BYTES OF CRC. 


6.1.1 TRANSMIT MODE 


A LIST OF MESSAGES IS TRANSMITTED WITHOUT EXPECTING ANY DATA 
TO BE RECEIVED. 


6.1.2 RECEIVE MODE 


SPACE IS QUEUVED FOR THE DEVICE TO RECEIVE MESSAGES. 

AFTER RECEIVING AN “EXPECTED’’ NUMBER OF MESSAGES, THE DATA RECEIVED 
CAN BE COMPARED AGAINST A LIST OF “EXPECT TO RECEIVE'’ MESSAGES 

IF DATA=CHECKING IS ENABLED. 
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6.1.3 PASSIVE MODE 


THEN EVERY TIME A MESSAGE IS RECEIVED, A MESSAGE IS ven, Yee 
DATA CHECKING CAN BE DONE ON THE RECEIVED DATA. THE ''/ECHO, /NOECHO'' 
ENABLES/DISABLES THE RETRANSMISSION OF THE DATA RECEIVED. 


6.1.4 ACTIVE MODE 


A LIST OF MESSAGES IS TRANSMITTED AND MESSAGES ARE RECEIVED. 

hag RECEIVING AN ‘EXPECTED'’ A OF MESSAGES, THE DATA RECEIVED 
AN BE COMPARED AGAINST A aor, SP "EXPECT TO RECEIVE'’ MESSAGES 

IF DATA=CHECKING IS ENABLED 


NOTE: IF BOTH ENDS OF THE LINK ARE IN ACTIVE MODE, THEN THE 
LINK MUST BE A FULL DUPLEX LINK! 


6.1.5 DOWN=L INE=LOAD 


DOWN=-LINF-LOADING IS NOT SUPPORTED FOR DPV-11 TO DPV-11 LINKS. 


6.1.6 TALK MODE 


THE a. END OF THE LINK TRANSMITS OPERATOR-TYPED MESSAGES 
UNTIL 4 “EXIT’* MESSAGE IS vase 2 eond THAT POINT, THE NODE GOES 


AN 
FOUR CHARACTERS ARE “EXIT"’, 
NEED TO BE "EXIT'’, MORE CHARACTERS CAN BE ADDED SO THAT A MESSAGE 
MAY BE SENT AND THE MODE SWITCHED ALL AT ONCE. FOR EXAMPLE: 


TLK> EXIT ALL OF THIS LINE IS SENT THEN MODE SWTICHED 


6.1.7 





LISTEN MODE 


END OF THE LINK PRINTS ALL OF THE MESSAGES 

HE DEVICE wt THE OPERATOR'S CONSOLE. IF THE, MESSAGE 
Rar MESSAGE, THEN THE NODE ENTERS "‘TALK'' MODE, 
GE"’ IS A MESSAGE WHOSE FIRST FOUR CHARA Lites ARE “EXIT. 
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6.1.8 MAINTENANCE ‘‘LOOP’* MODES 


REMEMBER THAT THE WHENEVER A ‘'RUN'’ COMMAND IS TYPED, THE ome. is 
NO LOOPBACK AND THAT A LOOP MODE MUST BE SPECIFIED BY A ‘‘/LOOP=. 

IF A LOOP MODE IS DESIRED. 

LOOP MODES ARE ONLY VALID IF THE MODE TO RUN IS ACTIVE ! 


INTERNALTTL LOOPS DATA INTERNAL TO THE USYNRT 


THE FOLLOWING TABLE SUMMARIZES THE MODES THAT CAN BE RUN TOGETHER 
Nhe tee IS RUNNING ON TWO PROCESSORS (ONE AT EACH 


!STATION A STATION B : 


"HOST" NODE **/LOOP"’ ALLOWED? ‘REMOTE'* NODE DUPLEX 
i TALK NO LISTEN*, RECEIVE HALF OR FULL! 
'LISTEN NO TALK*, TRANSMIT HALF OR FULL! 
! TRANSMIT NO RECEIVE*, LISTEN HALF OR FULL! 
'RECEIVE NO TRANSMIT*, TALK HALF OR FULL! 
! PASSIVE NO ACTIVE* HALF OR FULL! 
‘ACTIVE YES ACTIVE* FULL ; 
‘ACTIVE YES PASSIVE* HALF OR FULL: 


! 
' DOWNL INELOAD ** DOWN=-LINE-LOADING IS NOT SUPPORTED FOR DPv-11_ | 
TO DPv-11 LINKS. i 


*= MOST LIKELY TO BE IN THAT MODE 
NOTE: H/D START way INDICATES WHICH NODE TO START FIRST ON A 








HALF DUPLEX LI 
6.2 MESSAGE DESCRIPTIONS 
NAME DESCRIPTION 
ZEROES MESSAGE OF ALL 0°S (00000000,00000000,00000000,...) 
ONE S MESSAGE OF ALL 1°S (11111111.11111111,11111111....) 
1ALT MESSAGE OF ALTERNATING 1°S (10101010,10101010,....) 
T SAGE 0°S (01010101.01010101..... 
CCITT CITT 12-817 (VS. 511 BITS) TEST PATTERN 
ITEP | NTERPROCE SSOR Test PROGRAM S (ITEP) MESSAGE 101: 
yy <177>/$A T 
LAZY DOG. fT See contest? ><1 Nt? ><1 a 
ALPHA ALPHA-NUMERICS (OR FUTURE COMM 


TURNAROUND MSG) 
est (AMPERSAND) * () ##,=.0123456789: ; <=> ?@ABCDEF GHI JK 
(MNOPORSTUVURY D/C). x x5 





SEQ 0024 
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OPERATOR=SPECIF IED "A-2,0-9, SPACES, TABS’ 
THESE ARE THAT THE CHARACTERS THAT CAN 
BE TYPED BETWEEN QUOTATION MARKS ("'..*’) 
TO SPECIFIY A UNIQUE MESSAGE. 


7.0 OTHER INFORMATION 


7.1 INTERFACING TO AN ““ITEP’’ NODE 


THESE ARE THE RULES WHEN USING ITEP/WITH A DUP TO TALK 
TO A DPV USING DCLT. 


ITEP NODE DCLT NODE 
ANSWER ALL QUESTION TO THE ANSWER ALL QUESTIONS TO THE 
SET SWITCHES PROMPT. DCLT> PROMPT. 


REE REREEAEEREKARERERAEARRKREKH 


FOR ONE WAY OUT... 
SET SWITCHES TO 1221 CLEAR pasts: 

SET E=ITEP/S=56 

RUN MODE=REC/STATUS/CHECK 
NOTE: DUP ITEP SENDS ONLY 56 CHARS 
RARER RARE RRA RE ERE R EERE ERE AREER RRR 
FOR ONE WAY IN..... 
SET SWITCHES TO ....1222 RUN MODE=TRA/STATUS 
RARER AAAAARERERERA ERE ARETE REAR A EEA ATR ARATE 
FOR EXTERNAL LOOPBACK.... 
SET SWITCHES.......1224 CLEAR EXPECTED 

SET EXP=ITEP/S=56 

RUN MODE=ACTIVE/STATUS/CHECK 


ETT TILT ITTit ttt tiitiiiiiiiiiiiiii iii iii iii 
FOR INTERNAL LOOPBACK...... 
SET SwWIICHES......1260 CLEAR EXPECTED 

SET EXP=1TEP/S=56 

RUN MODE=ACTIVE/STATUS/CHECK 


RERAAAAAREREEREAEERAAEAEERRAERAEAEAEAEAEEAEREREEEEAEEAAEERAAAREREE ES 


NOTE: DO NOT USE SWITCH ' WITH ITEP GOING TO DCLT 
THE ONLY MESG. DCLT SUPPORTS IS MSG 1. 





A 
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DCLT IGNORES CRC ERRORS WHEN REC DATA FROM ITEP 
BECAUSE ITPE SENDS NO CRC. 


7.2 TROUBLESHOOTING HINTS 


LISTED BELOW ARE SOME SETUPS THAT COULD re USED FOR ISOLATING FAULTS. 
THESE ARE BY a hy my THE ONLY WAYS DCLT CAN BE USED !!'!!!! 

DCLT IS MEANT TO BE A VERY FLEXIBLE TOOL! THIS SECTION IS MEANT TO 
GIVE SOMEONE NOT TOO FAMILIAR WITH DCLT A PLACE TO START. 


REMEMBER THAT THE PRINTING OF STATUS MESSAGES AND PRINTING OF THE 
EVENT LOG CAN PROVIDE A _LOT OF INFORMATION ABOUT THE SEQUENCE OF 
EVENTS AND HOW THE DEVICE AND LINK ARE BEHAVING. 


NOTE: IF BOTH NODES IN ACTIVE AND ‘'/NOCHECK’* IS USED, 

----- END-OF=-PASS IS ee ake AS RECEIVING 1 MESSAGE 
AND COMPLETING THE T vy) LIST. Ya NO DATA 
CHECKING, THERE IS NOU WAY FOR DCLi TO KNOW HOW 
MANY MESSAGES IT SHOULD EXPECT TO RECEIVE. 


7.2.1 INTERNAL LOOP AT EACH NODE 


RUN EACH END OF THE LINK IN ACTIVE MODE WITH LOOP=INTERNAL. 
TRANSMIT TWO OR THREE MESSAGES WITH NO DATA CHECKING. 

STATUS PRINTING COULD BE TURNED OFF IF ON, BUT SEEING THE SEQUENCE 
OF EVENTS MIGHT BE INFORMATIVE. 


A POSSIBLE COMMAND SEQUENCE IS: 
CE 


CT 
SE T=ONES/S=20/C=2 
R M=A/LO=] /NOCH/STAT 


WHAT THE ABOVE COMMAND SEQUENCE MEANS: 


THE *‘C E** AND THE °C 5 Le THE ‘EXPECT*' 
ST’*. THE ‘'SE T=ONES/S=20/C=2"° 


S. THE MESSAGE 
CONTAIN DATA OF ALL ONES AND EACH ONE IS 20 BYTES IN LENGTH. 
THE “R M=A/LO=1/NOCH/STAT.’ SETS THE MODE TO RUN IN TO BE 
ACTIVE AND LOOP TYPE TO BE INTERNAL TIL. THE PROGRAM 

NOT BE CHECKING DATA SO THERE WAS NO NEED TO SET UP AN 

EXPECT LIST. THE PROGRAM WILL BE PRINTING STATUS MESSAGES. 


T YOU SHOULD SEE AFTER eee THE RUN COMMAND 
te THINGS ARE RUNNING CORRECTL 


IN] RXQ TXQ RXQ TXC TXO RXQ TXC 
TXQ RXQ TXC EOP 

HOE ACTIVE A) Opi Deer eeaens a eeeeeee 
can ws TATUS/NOCHE (K/NOE CHO/NOMODEM 


* 
z 
a 
<i 
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THIS GIVES YOU A IDEA IF THE COMM. DEVICE CAN EVEN TRANSMIT AND 

RECEIVE. ANY ERRORS REPORTED WILL PROBABLY BE DUE TO INCORRECT 

DEVICE ADDRESSES BEING USED OR A FAULTY DEVICE. CHECK ADDRESSES 

eee AND RUN THE PREREQUISITE DIAGNOSTICS FOR THE COMM. 
VICE. 


NOW TRY RUNNING EACH NODE THE SAME WAY WITH DATA CHECKING ENABLED. 
A POSSIBLE COMMMAND SEQUENCE IS: 


SE E=T 
R M=A/LO=1/CH/PAS=3 


WHAT THIS SEQUENCE MEANS: fe 


THIS SEQUENCE IS SIMILAR TO THE ONE ABOVE . THE ‘'SE E=T"' 
MAKES A COPY OF THE TRANSMIT LIST IN THE EXPECT LIST. 

THE EXPECT LIST NOW CONTAINS 3 MESSAGES. THE MESSAGES WILL 
HAVE ALL ONES FOR DATA AND BE 20 BYTES EACH IN LENGTH. 

THE RUN COMMAND IS_THE SAME WITH THE ADDITION OF TWO 
SWITCHES *'/CH/PAS=3''. THE "'CH'’ SWITCH TELLS THE PROGRAM 

TO CHECK THE RECEIVED DATA AGAINST THE ‘EXPECTED LIST’. 

THE ‘PAS=3'" SWITCH TELLS THE PROGRAM TO RUN 3 PASSES BEFORE 
RETURNING TO THE DCLT> PROMPT. . 


WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND 
IF THINGS ARE RUNNING CORRECTLY : 


INI RXQ TXQ TXC RXQ TXQ TXC RXQ 
T¥Q TXC CMP CMP CMP EOP RXQ TXQ 
TXC RXQ TXQ TXC RXQ TXQ TXC CMP 
CMP CMP EOP RXQ TXQ TXC RXQ TXQ 
TXC RXQ TXQ TXC CMP CMP CMP EOP 
MODE =ACTIVE/LOOP= INTERNAL /PASS=00000 
/STATUS/ CHE CK/NOE CHO/NOMODEM 


IF A CABLE TURNAROUND CONNECTOR Is AVAILABLE PUT IT ON THE END OF 
THE CABLE JUST BEFORE THE MODEM OR IF A H3260(RS-423) ON BOARD 
CONNECTOR IS AVAILABLE INSTALL IT aD RUN IN ACTIVE MODE WITH THE 
"'7_OOP=CABLE'’ SWIT 

POSSIBLE COMMAND SEQUENCE IS: 


R M=A/L=C/CH/PAS=3 
WHAT THIS SEQUENCE MEANS: 


THIS SEQUENCE HAS THE *'/LO=C"*. THIS INFORMS THE SOFTWARE 
NOT TO CHECK FOR DATA SET READY SIGNAL FROM THE MODEM. 


WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND 
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IF THINGS ARE RUNNING CORRECTLY : 


INI RXQ TXQ TXC RXQ TXQ TXC RXQ 
TXQ TXC CMP CMP CMP EOP RXQ TXQ 
TXC RXQ TXQ TXC RXQ TXQ TXC CMP 
CMP CMP EOP RXQ TXQ TXC RXQ TXQ 
TXC RXQ TXQ TXC CMP CMP CMP EOP 
MODE=ACT1VE/LOOP=CABLE/PASS=00000 
/STATUS/ CHE CK/NOE CHO/NOMODEM 
DCLT> (A) ? 


7.2.2 TRANSMIT ON ONE NODE RECEIVE ON THE OTHER 


NOW TRY TRANSMIITING FROM ONE END AND RECEIVING ON THE 
OTHER. MAYBE WITH NO DATA CHECKING AT FIRST TO ESTABLISH 
IF THE LINK IS WORKING. POSSIBLE COMMAND SEQUENCES ARE: 


NODE A NODE B 

CE CE 

CT CT 

SE T=1ALT/S=250 R M=R/NOCH/PAS=3 
R M=TR/PAS=3 


WHAT THIS SEQUENCE MEANS: 


THE ‘'C E ‘* AND ''C T°’ INITIALIZE BOTH THE 

TRANSMIT AND EXPECT LISTS. THE ‘‘SE T=1ALT/S=250"' 

SETS THE TRANSMIT LIST ON NODE A TO BE 1 MESSAGE 

WITH A ag de OF 250 BYTES AND DATA OF ALTERNATING 
ONES AND ZEROS. THE ‘R on hee in 3°" SETS THE RUN MODE OF 
NODE ATO BE TRANSMIT AND THE PASS COUNT IS SET TO 3. 
THE *R, M=R/NOCH/PAS=3"" SETS THE RUN MODE OF ie B 

TO BE RECEIVE, NO DATA CHECKING IS TO BE DONE ,AND 

THE PASS COUNT IS SET TO THREE. 


WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND 
IF THINGS ARE RUNNING CORRECTLY : 


FOR NODE A: 
INI TXQ TXC EOP TXQ TXC EOP TXQ 
TxC EOP 
MODE = TRANSM] T/PASS=00000 
/STATUS/NOCHE CK/NOE CHO/NOMODEM 
DCLT> (A) ? 


FOR NODE B: 
INI RXQ EOP RxXQ EOP RXQ EOP 
MODE =RE CE 1 VE/PASS=00000 
/STATUS/NOCHE CK/NOE CHO/NOMODEM 


DCLT> (A) ? 
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NOW TRY DOING DATA CHECKING ON THE MESSAGE(S) BEING 
TRANSMITTED. POSSIBLE COMMAND SEQUENCES ARE: 


SE E=1ALT/S=250 
R M=TR/PAS=3 R M=R/CH/PAS=3 


WHAT — SEQUENCE MEANS: 
THE *'SE E=1ALT/S=250'" LINE MUST BE ADDED HERE 
TO SET UP THE ‘EXPECT Uist: ON THE a NODE 
SO IT WILL ~~ WHAT TO COMPARE AGAINS 
THE CHANGE IN THE RUN COMMAND IS FROM oc’ TO 
"CH''.. THE ''CH'' ENABLES DATA CHECKING. 


WHAT YOU SHOULD SEE + tages ENTERING THE RUN COMMAND IF THINGS 
ARE RUNNING CORRECTL 


NODE A: IS THE SAME AS ABOVE. 


NODE B: 
INI RXQ CMP EOP RXQ CMP EOP RXQ CMP EOP 
MODE =RE CE 1 VE/PASS=00000 
/STATUS/ CHE CK/NOE CHO/NOMODEM 
DCLT> (A)? 


NOW RUN THRU THE SEQUENCE AGAIN WITH NODE A RECEIVING 
AND NODE B TRANMITTING TO CHECK OUT THE OPPOSITE 
DIRECTION OF DATA FLOW. 


7.2.3 ONE NODE ACTIVE THE OTHER NODE PASSIVE 


NOW TRY RUNNING ONE NODE IN ACTIVE MODE WHILE THE OTHER 
END RUNS IN PASSIVE. DATA CHECKING SHOULD BE TURNED OFF 
IF THE MESSAGE LISTS ARE NOT THE SAME. 

POSSIBLE COMMAND SEQUENCES ARE: 


NODE A NODE B 

CE CE 

CT . ¥ 

SE T=CCITT/S=10/C=2 SE T=1ALT/S=20/C=2 
R M=ACT/NOCH/PAS=3 R M=P/NOCH/PAS=3 


WHAT THIS SEQUENCE MEANS: 
a EXECUTION OF THIS + ae ag as? THE FOLL 
THINGS TO HAPPEN ON NODE A. THE TRANSMIT AND EXPE 
LISTS ARE INITIALIZED THEN THE TRANSMIT LIST IS § 
TO 3 MESSAGES OF 10 BYTES feet fae —— IN 


© 
z 


I I E 

THE PASS COUNT SET TO THREE. NOTE STATUS WOULD STILL BE 
ely IF THE PREVIOUS SEQUENCES HAD BEEN RUN. 

If YOU ARE RUNNING FROM LOAD TIME YOU WOULD HAVE 

TO ADD A "'/STA TO THE RUN COMMAND LINE. 
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| 

NODE 8B: THE TRANSMIT AND EXPECT LISTS ARE INTIALIZED 
THEN THE TRANSMIT LIST IS SET TO 3 MESSAGES OF 
20 BYTES EACH. THE DATA FOR EACH MESSAGE IS ALTERNATING 
1°S AND O'S. THE NODE IS THEN RUN IN PASSIVE MODE WITH 
| d DATA CHECKING DISABLED AND THE PASS COUNT SET TO 3. 


WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND 
IF THINGS ARE RUNNING CORRECTLY : 


FOR NODE A: 


INI RXQ TXQ TXC RXQ TXQ TXC RXQ 
TxXQ TXC EOP RXQ TXQ TXC RXQ TXQ 
TXC RXQ TXQ TXC EOP RXQ TXQ TXC 
RxXQ TXQ TXC RXQ TXQ TXC EOP 
MODE =ACT1VE/PASS=00000 
/STATUS/NOCHE CK/NOE CHO/NOMODEM 
DCLT> (A) ? 


FOR NODE B: 
INI RXQ TXQ TXC RXQ TXQ TXC RXQ 
TxXQ TXC EOP RXQ TXQ TXC RXQ TXQ 
TXC EOP RXQ TXQ TXC RXQ TXQ TXC 
RxQ TXQ TXC EOP 

MODE =PASS1 VE/PASS=00000 

/ STATUS/NOCHE CK/NOE CHO/NOMODEM 

DCLT> (A) ? 


NOW USE DATA CHECKING WITH THE "EXPECT MESSAGE LISTS‘* SET 
UP APPROPRIATELY. ANOTHER VARIATION IS TO HAVE LARGE SIZE 
MESSAGES ON ONE SIDE WITH SMALL MESSAGES ON THE OTHER. : 


THEN REVERSE THE SETUP SO THAT THE NODE RUNNING IN ACTIVE 
IS RUANING IN PASSIVE AND VICE VERSA. 


7.2.4 BOTH NODES ACTIVE 


NOW BOTH NODES CAN BE RUN IN ACTIVE WITH DATA CHECKING ON 
eT gaa cctadae COULD BE TURNED OFF IF YOU'RE NOT INTERESTED 


NODE A NODE 8 

C 3 CE 

SE T=OALT/S=10 SE E=0ALT/S=10 

SE T=CCITT/S=20 SE E=CCITT/S=20 

SE T=ALPHA/S=30 SE E=ALPHA/S=30 

SE E=ZERO/S=11 SE T=ZERO/S=11 

SE pia SE T=ONES/S=21 

SE E=ITEP/S=351 SE T=ITEP/S=351 

R M=A/CH/NOST/PAS=3 R M=A/CH/NOST/PAS=3 
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| 

WHAT THIS SEQUENCE MEANS: 

| NODE A SETS UP IS TRANSMIT LIST TO BE 
3 MESSAGES. MESSAGE 1 IS 10 BYTES LONG AND 

CONTAINS DATA OF ALTENATING O'S AND 1°S 

| MESSAGE 2 IS 20 BYTES LONG AND CONTAINS 

DATA OF THE CCITT PATTERN. MESSAGE THREE 

IS 30 BYTES LONG AND CONTAINS ALPHANUMERICS 
FOR DATA. THE EXPECT LIST ALSO CONTAINS 

3 MESSAGES. MESSAGE 1 IS 11 BYTES LONG AND 

| CONTAINS O'S FOR DATA. MESSAGE TWO IS 21 

BYTES LONG AND CONTAINS 1'S FOR DATA. MESSAGE 
31S 3 BYTES LONG AND CONTAINS THE ITEP DATA. 
NODE B HAS THE SAME MESSAGES EXCEPT THAT THE 
TRANSMIT MESSAGE LIST IS THE EXPECT MESSAGE LIST 
AND VICE VERSA. 
BOTH NODES ARE RUN IN THE ACTIVE MODE WITH 
DATA CHECKING AND PASS COUNT EQUAL TO THREE. 


WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND 
IF THINGS ARE RUNNING CORRECTLY : 
ON BOTH NODES A AND B: 
MODE =ACT 1 VE/PASS=00000 
/NOSTATUS/ CHE CK/NOE CHO/NOMODEM 
DCLT> (A) ? 


A VARIATION THAT CAN BE USED IS 
SMALL MESSAGES AND THE OTHER TO 
ig + ahead POINT WILL BE 


EW LARGE MESSAGES. 


FOR ONE END TO SEND A LOT OF 
SEND A F 
OUT OF SYNC BUT THIS IS NOT 


7.2.5 TALK AND LISTEN MODES FOR COMMUNICATING 

TALK AND LISTEN MODES ARE USEFUL IF THE OPERATORS WISH TO COMMUNICATE 
WITH EACH OTHER. JUST SETUP A TIME THAT EACH WILL GO TO THEIR MODE, 
iokteetat hae AND SEND eae OVER THE LINK. POSSIBLE COMMAND 


R M=LIS/NOST R M=TA/NOST 
LIS> TLK> 


7.3 EXAMPLES OF COMMANDS 


THIS SECTION WILL SHOW A SAMPLING OF COMMANDS AND 
EXACTLY WHAT TO EXPECT FROM THEM, 


7.3.1 EXAMPLES OF MESSAGES COMMANDS 
THE CLEAR COMMANDS . 


CE 
CT 


THIS WILL INITIALIZE THE TRANSMIT AND EXPECT LIST 
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TO 1 MESSAGE OF 58 BYTES. THE DATA OF THE MESSAGE WILL 
BE THE ITEP MESSAGE. 


| 
| IF THESE copwens ARE FOLLOWED BY A SHOW COMMAND 


SH 
SUCH AS THE SHOW EXPECT LIST. WHAT YOU WOULD SEE IS 
MSG: TYPE=ITEP/SIZE=58 
pernaaininicnie 85 > 00001 
NOS TATUS/ CHE CK/NOE CHO/NOMODEM 


DCLT> (A) 
NOW IF io pe aven SE} EXPECT LIST COMMAND SUCH AS: 
AND ee IT WITH A SHOW EXPECT LIST COMMAND 


SH 
WHAT YOU WOULD SEE IS 

MSG: TYPE=ALPHA/SIZE=35 

MSG: TYPE=ALPHA/SIZE=35 

MSG: TYPE=ALPHA/SIZE=35 

MSG: TYPE=ALPHA/S1ZE=35 

MODE =ACT 1 VE/PASS=00001 
/NOSTATUS/ CHE CK/NOE CHO/NOMODEM 

DCLT> (A) ? 


7.3.2 EXAMPLES STATISTICAL COMMANDS 
IF YOU in HELP COMMMAND 


WHAT YOU WILL SEE IS 
DCLT CMDS: 
ine OR SHOW EXPECTLIST OR TRANSMITLIST 
EXIT 
DUMP START-END/B 
SET EXPECTMSG OR TRANSM] TMSG=TYPE/SIZE=N OR /COPY=N 
=r EXPECT=TRANSMIT 
TYPE=ONES , ZEROES, 1ALT,OALT ITEP, CCITT ALPHA 
OR "OPR SPCD=A-2,5P,TAB,0-9° IN QUOTES’ 
RUN MODE =MTYP/LOOP=LTYP/ CHECK, STATUS ,£ CHO,MODEM, PASS=N 
RUNTYPSTRAN, REC,ACT,PAS, TAL,L1S.DOWN 
LTYP=INT, CAB, LOC ,REM/ 


DCLT> (A) ? 
THE SAME WILL HAPPEN IF YOU USE THE ? 
THE DUMP COMMAND WORKS LIKE THIS 
DUM 41260-41300 

THIS WILL DUMP THE DATA FROM ADDRESSES 41260 TO 

41300 IN THE FOLLOWING MANNER 
41260 104423 000167 177772 021122 012112 006312 006312 006312 
41300 006312 
IF YOU HAD USED THE /B SWITCH 

41260-4 1300/8 


DUM 
WHAT YOU WOULD SEE JS 





SEQ 0032 


A SSS SS ss 


se 
| 
| 
| 
| 
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41260 023 
41270 112 
41300 312 


7.3.3 EXAMPLES RUN COMMMANDS 


YOU CAN FIND SEVERAL EXAMPLES OF THE RUN COMMMAND IN THE 
TROUBLE SHOOTING HINTS SECTION BUT HERE ARE SOME OTHERS. 


IF YOU a" TO EXECUTE THE RUN COMMAND 
M=TR/NOST/CH/PAS=4 
WHAT woul HAPPEN 728 fy 4 PASSES THE PROGRAM WOULD RETURN 
TO THE DCLT PROMPT AND PRINT 
MODE = TRANSMI T/PASS=00000 
ect /NOSTATUS/ CHE CK/NOE CHO/NOMODEM 
LT> 


(A) ? 
IF YOU “ TO EXECUTE THE RUN COMMAND 


. 
R M=A/LO=I1/ST/CH/PAS=3 
WHAT YOU WOULD SEE (IF USING DEFAULT TRANSMIT AND EXPECT 
MESSAGES) IS 
IN] RXQ TXQ TXC CMP EOP RXQ TXQ 
TXC CMP FOP RXQ TXQ TXC CMP EOP 
MODE =ACT 1 VE/LOOP= INTERNAL /PASS=0000 
/STATUS/ CHE CK/NOE CHO/NOMODEM 
DCLT> (A) ? 


IF YOU 7 te EXIT COMMAND 
WHAT YOU WOULD SEE IS 

CZCLK EOP 

0 CUMLATIVE ERRORS 

DR> 
7.3.4 EXAMPLES PRINT COMMANDS 
THE PRINT COMMMAND CAN BE USED FROM THE ei (DR>) 
LEVEL OR oe DCLT (DCLT>) LEVEL. ONCE YOU ARE AT THE 
REPORT LEVEL YOU WILL KNOW JT BY THE PROMPT RPT>" 
AFTER TYPING PRI FOR EITHER THE THE DLCT> OR DR> THE 
FOLLOWING IS DISPLAYED. 


TYPE *H’' OR *'?** FOR HELP! 
RPT> (A) ? 


HERE ARE SOME EXAMPLES OF RPT> LEVEL COMMANDS: 
THE HELP OR ? COMMAND 
HELP 


? 


PRODUCES THE FOLLOWING: 


SEQ 0033 
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LOG = PRINT DCLT EVENT LOG 
EXIT = EXIT REPORT LEVEL 
HELP = PRINT THIS MESSAGE 


RPT> (A) ? LOG 
THE LOG COMMAND PRODUCES THE FOLLOWING 


>>> DCLT > eal LOG ENTRY >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
0:01:16 RECEIVE SPACE QUEUED 
ADDR OF MSG=000455 BYTE COUNT= 512 
MODEM STATUS: - - og> xy oc SQD 4 


>>> DCLT EVENT LOG ENTRY aR EM BS Oe Soren 
0:01:16 RECEIVE SPACE QUEUED 
ADDR OF MSG=0004655 BYTE COUNT= 512 
MODEM STATUS: hy os oy _ » ~ " 


| 
DCLT REPORT CMDS: 
| 
| 


THIS GOES ON FOR 45 EVENTS IF THE MODE 
PREVIOUSLY EXECUTED HAD THAT MANY 

YOU EXIT FROM EVENT LOG PRINTING BY 
TYPING A CONTROL C. 


TO LEAVE THE REPORT LEVEL INPUT THE ‘EXIT’ COMMAND. 


7.3.5 EXAMPLE EXIT COMMAND 
THE EXIT COMMAND WORKS LIKE THIS. IF YOU 
ENTERED THE REPORT LEVEL FROM THE SUPERVISOR 
(DR>) THEN TYPING 

EXIT 
WILL RETURN YOU TO THE SUPERVISOR, 

DR> 


IF YOU ENTERED REPORT FROM THE DCLT LEVEL 
THEN TYPING 


EXIT 
WILL RETURN YOU TO THE DCLT LEVEL. 
DCLT> 


7.4 THINGS TO WATCH OUT FOR 
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a 

| 

me 

| IF YOU ARE RUNNING DCLT ON SYSTEMS THAT HAVE CONSOLES 
WITH DIFFERENT SPEEDS YOU WILL BE UNABLE TO USE THE 
PRINT STATUS FEATURE IN CERTAIN MODES. THE RULE IS 
IF IT DOESNT WORK WITH STATUS PRINTING RUN THE MODE 
WITH NOSTATUS. 


IF YOU ARE USING PASSIVE +. obs THE ECHO SWITCH 
THEN YOU WILL PROBABLY HAVE TO RE-ENTER THE TRANSMIT 
LIST ON THE SIDE WITH THE ECHO SWITCH. THE REASON IS 
THAT THE TRANSMIT LIST GETS OVER WRITTEN WITH THE 
RECEIVE LIST WHEN USING THE ECHO SWITCH. 


BEWARE THAT THIS DCLT WILL NOT RUN THE DPV11 AT ITS 
HIGH CLOCK SPEED OF SOKHZ SINCE THE SOFTWARE IS NOT 
ABLE TO KEEP UP WITH THIS SPEED. 











——— 
| 
| 
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-SBTTL PROGRAM HEADER 
BGNMOD 


++ 


; THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
; THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 


POINTER BGNRPT ,BGNAU,BGNDU 


HEADER CVCLH,B,0,1800. ,0,4PRI07 


LSNAME : : 


55555555 


SE 0036 


LSLAST 
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(4) 2034 000000 WORD 0 

(5) 002036 LSAPT 

(4) 2036 000000 «WORD 0O 

(S$) 002040 LSDTP 

(4) 002040 002124 «WORD LS$DISPATCH 

(5) 002042 LSPRIO:: 

(4) 002042 000340 -WORD #PRIO7 

(5) 002044 LSENVI:: 

(4> 002044 000000 «WORD O 

(5) 002046 LSEXP1:: 

(4) 2046 000000 «WORD 0O 

(5) 002050 LSMREV:: 

(4) 0 003 BYTE C$REVISION 

(3) 51 003 BYTE CSEDIT 

(5) 002052 LSEF 

(4) 2 000000 «WORD 0O 

(5) 002054 000000 «WORD 0 

(5) LSSPC 

(4) 002056 000000 «WORD O 

(5) 002060 LSDEVP:: 

(4) 002060 011474 ~ WORD LSDVTYP 

(5) 002062 LSREPP: : 

(4) 002062 024156 «WORD cLS$RPT 

(5) 002064 LSEXP4:: 

(4) 002064 000000 «WORD O 

(5) 002066 LSEXPS:: 

(4) 002066 000000 «WORD O 

(5) 002070 LSAUT: 

(4) 002070 025064 «WORD LSAU 

(5) 002072 LS$DUT 

(4) 002072 025056 -WORD LS$DU 

(5) 002074 LSLUN 

(4) 002074 000000 -WORD 0 

(5) 002076 LSDESP:: 

(4) 002076 011504 «WORD LSDESC 

(5) 002100 LSLOAD: : 

(4) 002100 104035 EMT ESLOAD 

(5) 002102 LSETP:: 

(4) 002702 000000 «WORD 0 

(5) 002104 LSICP:: 

(4) 002104 024172 «WORD LSINIT 

(5) 002106 LSCCP:: 

(4) 002% 025034 «WORD LSCLEAN 

(5) 11 LSACP:: 

(4) 11 025032 ~ WORD LSAUTO 

(5) by LSPRT:: 

(4) 11 024164 ~ WORD LSPROT 

(5) 114 LSTEST:: 

(4) 114 000000 -WORD 0 

(5) 116 LSOLY:: 

(4) 002116 000000 «WORD 0 

(5) ons 1ss LSHIME:: 

(4) 1 000000 «WORD QO 
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41 .SBTTL DISPATCH TABLE 

2131 

Zoe 

ai82 : THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 

4135 : IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 

4135 . 

4136 2 DISPATCH 1 


00212 

(4) 002122 000001 -WORD 1 
002124 LSDISPATCH: : 
0021 025072 «WORT T1 





EEE ee a 
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4145 ‘ .SBTTL UEFAULT HARDWARE P=-TABLE 


. uo 3 THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 
4149 ‘ ; THE TEST=DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
: ; IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES, 
; AND IS USED AS A ‘‘TEMPLATE’’ FOR BUILDING THE P-TABLES. 


26 BGNHW DFPTBL 

26 000010 .WORD 110000-L$HW/2 
30 ' LSHW: : 

30 DFPTBL:: 

4166 : y INDEPENDENT SECTION 


4167 : THE NUMBERS IN BRACKETS ARE THE OFFSET VALUES USED IN THE PARAMETER 
4168 : CODING SECTION. 


: 


4171 002130 000001 - WORD 1 :(0] FULL OR HALF DUPLEX FLAG (BITO=1 IF FULL) 


4187 cee DEVICE DEPENDENT SECTION 
4188 ; ADDING OR REMOVING WORDS FROM THIS TABLE EFFECTS THE ‘'GET’' CALLS IN 
4189 : THE HARDWARE PARAMTER CODING SECTION BY CHANGING ‘OFFSETS’ 


160170 CSR_ADDRESS 
300 INTERRUPT VECTOR 
240 ghee T PRIORITY (5) 


EER SERe 


SPARE 
J OTHER NODE “*ITEP’’ 
J SPARE 


SS FEASSEN 


* 
8 
= 


L10000: 





ae ae OC CL —“ CF - - e-- 
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4202 
4203 
4220 
4243 
4244 .SBTTL GLOBAL EQUATES SECTION 
4245 
4246 
4256 
258 
4259 -- THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
4260 ; ARE USED IN MORE THAN ONE TEST. 
4261 == 
4262 
4277 
sere 002150 EQUALS 
48 ; BIT DIFINITIONS 
(1) 1 BIT15== 100000 
(1) 0000 BIT14== 40000 
(1) 020000 B1T13== 20000 
(1) C10000 BIT12== 10000 
(1) 000 BIT11== 4000 
(1) 002000 B1T10== 2000 
(1) 001000 BITO9== 1000 
(1) 000400 BITO8== 400 
(1) 000200 BITO7== 200 
(1) 000100 BITO06== 100 
(1) 0 BITOS== 40 
(1) 000020 BITO04== 20 
(1) 000010 BITO3== 10 
(1) 600004 BITO2== 4 
(1) 000002 BITO1== 2 
oa 000001 BITOO== 1 
(1) 001000 BIT9== BITO9 
(1) 00 BIT8== BIT08 
(1) 000200 BIT7== BITO7 
(1) 000100 BIT6== BITO6 
(1) 000040 BITS== BITOS 
(1) . 000020 BIT4== BITO4 
(1) 000010 BIT3== BITO3 
(1) , 000004 BIT2== BITO2 
(1) 000002 BIT1== BI1TO1 
1 000001 pages B1T00 
(1) + EVENT FLAG DEFINITIONS 
33 +  EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 
(1) 000040 EF .START== $f: : T COMMAND WAS ISSUED 
(1) 000037 EF .RESTART== h 3 SE START COMMAND WAS ISSUED 
(1) 000036 EF . CONT JNUE== 30. ; CONTINUE COMMAND WAS ISSUED 
(1) 000035 EF .NEW== 29. : A NEW PASS HAS BEEN STARTED 
MY 000034 EF .PWR== 28. : A POWER-FAIL/POWER-UP OCCURRED 
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(1) ‘ 
(1) : PRIORITY LEVEL DEFINITIONS. ‘ 
(1) 000340 PRIO7== 340 
(1) 300 PRI06== 300 
(1) 000240 PRIOS== 240 
(1) 200 PRI04== 200 
(1) 000140 PRIO3== 140 
(1) 000100 PRIO2== 100 
(1) 0 PRIO1== 40 
1) PRIOO== 
sh ‘OPERATOR FLAG BITS 
(1) EVL== 
(1) 000010 LOT== 10 
(1) 000020 ADR== 20 
(1) 0 IDU== 40 
(1) 000100 ISR== 100 
(1) 000200 == 200 
(1) 00 BOE == 400 
(1) 1000 PNT == 1000 
(1) 602000 PRI== 2000 
q) 004000 IXE== 4000 
(1) 010000 BE == 10000 
(1) 020000 IER== 20000 
(1) 040000 LOE== 40000 
mae 100000 HOE== 100000 
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CVCLHB.P11 -15=JUN-81 15: GLOBAL EQUATES SECTION 
428) ;***e* INDEPENDENT EQUATES 
4583 001000 BUFLIM=512. 

4284 
4285 000017 MSGLIM=15. 
4284 


PCLKEN= 111 
PCLKCT= 1600 


PARAM WORD EQUATES 


STATB= BITO 
DATCKB= BIT1 
ECHOB= BIT 

MOCHK= BITS 
CRCB= BIT4 
PROTOB= BITS 


OPTION TYPE EQUATES 


DPV= 0 
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MACY11 30A(1052)_ _16=JUN=81 


sMODE vf A pe EQUATES 


4 
10:00 PAGE 12-20 


:MAX Bhs SIZE IN BYTES 

PLIES TO TX,RX AND CMP ners 
MAX. NO. OF MESSAGES PER BUFFER 
; (FOR EACH INCREMENT (+1) TO MSGLIM, 
ADD 6 WORDS TO THE POINTER TABLE 
(PTRTAB:) SINCE THIS MEANS 2 MORE 
; ‘POINTER’ WORDS PER BUFFER. 


4 $2 IVE Bass 
;PASSIVE " WoDe 


; TALK MOD 
;LISTEN MODE 
;NO LOOP 

; INTERNAL TTL 
; CABLE LOOP 
sMODEM LOCAL 


;MODEM REMOTE 
MOP 


: CLOCK woe a TO BE LOADED IN CLK*S CSR 


L=CLOCK CSR VALUE TO ENABLE THE CLOCK 
:P=CLOCK CSR VALUE TO ENABLE THE CLOCK 
:P=CLOCK COUNT SET REGISTER FOR COUNTER 


; OPERATOR —_— ASKED FOR 
:DATA th BIT 


: MODEM STATUS CHECK err 
7CRC_CALCUALTE ASKED FOR 
:PROTOCOL PROCESSING ASKED FOR 


;CODE FOR DPV CHAR MODE 


sEVENT LOG MESSAGE TYPES (USED TO LOCATE EVENT od ated IN EVENT TABLE 
; AND | Ander TO SEPERATE SECTIONS OF THE EVENT 


REPORTING SECTION) 
UED 


TXQ= 0 st IT MESSA 
TXC= 2 iT IT C¢ E 
RXQ= 4 sRECEIVE BUFFER QUEUFD 
RxXC= 6 sRECEIVE COMPLETE 
DER= 10 sDEVICE INFORMAT] 
DvI= 12 ;DEVICE ABOUT TO IN 
DCK= 14 :DATA COMPARISON RESULTS 


SEQ 0042 


[ee 


| E 


4 
CVCLHB DP.-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN=-81 10:00 PAGE 12-21 SEQ 0043 
CVCLHB.P11 15=JUN=81 15:48 GLOBAL EQUATES SECTION 
000016 MSC= 16 ;MODEM STATUS CHANGE 
000020 DLE= 20 ;DATA COMPARISON LENGH ERROR 
000022 DDE= 22 :DATA COMPARISON DATA ERROR 
000024 EOP= 24 END OF PASS 
EQUATES FOR FLAG WORD 
000001 ININT= BITO : INPUT _INT. REC. 
000002 OTINT= BIT] ;OUTPUT INT REC 
000004 QRX= BIT2 RX QUED /COMPL 
000010 QTX= BITS : TX QUED/COMPL 
000100 ERX= BIT6 sEXPECT TO GET A RX COMPLED 
000200 ETX= BIT7 EXPECT TO GET A TX COMPLETED 
000020 TXM= BIT4 ag er i TX INTERRUPT ROUTINE 
; THAT IT IS TIME TO TRANSMIT BODY OF MSG. 
000040 RXM= BiTS ; INDICATES TO RX INTERUPPT ROUTINE 
THAT IT IS TIME TO REC MSG BODY 
000400 BCC= BIT8 TIME FOR CRC CHECK. 
601000 PAD= BIT9 ; INDICATES THAT PAD MUST BE SENT 
002000 INOVR= BIT10 INIT OVER 
004000 FIRST= BIT11 sFIRST TIME FOR CTS 


; SPECIAL CLI CODES FOR ‘‘CHAR’’ ARGUMENT IN CLI CALLS 
: (COMMAND LINE INTERPRETER DEFINITIONS) 


000000 CLIERR= 0 
000001 CLIEXI= 1 
000002 CLIBR= ¢ 
000003 CLIBIF= 
CLISPA= 4 
090005 CLINUM= 5 
000006 CLIALP= 6 
000007 CLIALN= 7 
000010 CLIOCT= 8. 
000011 CLIDEC= 9. 
000012 CLISTR= 10. 
; DEFS FOR COMMAND LINE INTERPRETATION ACTION VALUES 
000000 NULL=0 
000001 CLEAR=1 
00000 SHOW=2 
00000 CHE CK=3 
000004 RUN=4 
000005 HLP=5 
000006 CSHE XP=6 
000007 CSHTRN=7 
900010 SETEXP=10 
000011 SETTRN=11 
ale b4 SIZE=12 
00001 QcoPy=13 
000014 NUM=14 








F 4 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-22 SEQ 0044 
CVCLHB.P11 15=JUN=81 15:48 GLOBAL EQUATES SECTION 


4422 000015 OPRMSG=15 
4423 000016 STATUS=16 


| 
| 
| 
4427 00002 CMSG2=2 


I ; REV BEC 


men 


;eeeee DEVICE DEPENDENT EQUATES 

MODEM SIGNAL BIT DEF INITONS 
IF SIGNAL “wi IN DEVICE, EQUATE NAME TO BIT POSITION, 
ELSE EQUATE IT TO = 0 


CTS= B1T13 CLEAR TO SEND (CIRCUIT CB) 

DSR= BIT9 [DATA SET READY (CIRCUIT CC) 

DCD= BIT12 TDATA CARRIER DETECT (CIRCUIT CF) 
RTS= T ;REQUEST TO SEND (CIRCUIT CA) 
RI= BIT14 RING INDICATOR (CIRCU 

SQD= BIT QUALITY DETECT (CIRCUIT 


3 SIGNAL CG) 
TM= BITS [MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM) 





f-—_—- —------ prstsiessensnmascespismnstsaieengeienitasaanic a 


6 4 
CVCLHB DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-23 SEQ 0045 
“CVCLHB.PT1 «= 15=JUN=81 15:48 GLOBAL EQUATES SECTION 

6496 : DEVICE SIGNALS 

4497 000002 DTR= BIT! sDATA TERMINAL READY 
4698 000020 RXENA= BIT4 *RECEIVER ENABLE 
4499 000040 DSITEN= BITS “DATA SET CHANGE ENABLE 
| 4500 000100 RINTEN= BIT6 ‘REC INT. ENABLE 
| 4501 000200 RDATRY= BIT? TREC DATA READY 

4502 002000 RSTARY= B1T10 ‘REC STATUS READY 
| 4503 004000 RXACT= BIT11 TREC ACTI 
| 6504 000001 RESET= BITO “MASTER RESET 

4505 000002 TXACT= BIT! sTX ACTIVE 

4506 000004 TBMT = 8112 ‘TX BUFFER EMPTY 

4507 000010 TTLL= BIT “TTL LOOP BIT 

4508 000020 TXENA= BITS [TX ENABLE 

4509 000100 TINTEN= BIT6 *TX INT ENABLE 

4510 000400 = BIT8 ;TX START OF MSG. 

4511 001000 TEOM= BITS ‘Tx END OF MSG. 

4512 100000 TERR= BIT15 TX RROR 

4513 100000 RERR= BIT15 “REC OVER RUN 

4514 000226 SYN= 226 SYNC WORD 


H 
| CVCLHB DPv=11 DATA COMM. LINK TEST MACY11 penn eee, Peat 
| P11 15=JUN=81 15:48 GLOBAL DATA 
-SBTTL GLOBAL DATA SECTION 
. SBTTL 


:_IN N MORE THAN ONF T 


MESSAGE BYTE COUNT TABLE 


DMSGCT 

MSGOC: .WORD EMSGO-MSGO 
MSGIC: .WORD EMSG1-MSG1 
MSG2C: .WORD EMSG2-MS 
MSGSC: .WORD EMSG5-MSG 
MSG4C: .WORD EMSG4-MSG4 
MSGSC: .WORD EMSGS-MSG5 
MSG6C: .WORD EMSG6-MSG6 
OPCNT: .WORD 0 

MSG8C: .WORD EMSG8-MSG8 


DMSGAD : 


MSGO 
MSG1 
MSG2 
MSG3 
MSG4 
MSGS 
MSG6 
IF 
MSG8 
mMSGO: -BYTE 000 
EMSGO: 
MSG1: -BYTE 377 
EMSG1 
Ge: -BYTE 252 
EMSG2 
G3: BYTE 125 
EMSG3 
G4: 
WORD 
. WORD 
WORD 
. WORD 


EMSG4: 





4 
10:00 PAGE 12-24 


DEFAULT MESSAGE DEFINITIONS AND TABLES 


{THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 


s;BYTE COUNT OF MESSAGE #0 
BYTE COUNT OF MESSAGE #1 
;BYTE COUNT OF MESSAGE #2 
;BYTE COUNT OF MESSAGE #3 
;BYTE COUNT OF MESSAGE #4 
;BYTE COUNT OF MESSAGE #5 
sBYTE COUNT OF iahent - 
;BYTE COUNT FOR OPERATOR SPEC'D 


3 MESSAGE 


‘CCITT’ 512-BIT (VS. 511 BITS) 
177603, 157427, osioi i 047321, 163715, 105221, 143325, 1 


ZSsBAs BVssassss 


OF 


T 
OF RECEIVE BUFFER PILL 


PATTERN 


* #6 
OPERATOR SPEC*D MSG. 
RECEIVE BUFFER FILL PATTERN 


ALL 0°S 

ALL 1°S 

ALTERNATING 1°S 

ALTERNATING 0°S 

a Fe PATTERN 
42304 


040041 ,014116,052606, 172334, 105025, 123754,111337, 111523 
030030, 145064 , 137642, 143531 063617, 135075 ,066730,026575 


052012,053627,070071, 151172, 165044 ,031605 , 166652 ,016741 


SEQ 0046 





} I 4 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 bg i 16=JUN=-81 10:00 PAGE Hay f: 
CVCLHB.P14 15=JUN=81 15:48 EFAULT MESSAGE DEFINITIONS AND TABLES 


4565 002320 MSGS: in ot TEST PROGRAM'S (ITEP)** MESSAGE 


REEF 
Exes 
335 
SEBRLS. 
3 


g 

a8 

EASE RES 

Naa 
R 


~m 
oo 
al 
ao 
R 
o 


4568 tr 005015 077401 077577 ASCIZ = <15><12><001><177><177><177><177> 
002410 000177 


4569 002412 EMSGS: 


4570 002412 MSG6: PHA=NUMERICS (OR FUTURE COMM 


sASCII <177><177>/$A tHE QUICK BROWN FOX JUMPED OVER THE LAZY DOG./ 


if TURNAROUND MSG) 
4571 002412 022043 021041 023040 ASCII] /#$!"' &°() *+,=.0123456789: ; <=>?@ABCDEF GH] JKLMNOPORS TUVWXY2/ 


002500 0545 1 

4572 002503 057 056133 057135 eASCIZ = ?/0€\]*_%? 
002510 022537 000 

4573 002513 EMSG6: 

4574 002514 -EVEN 


PSD 
; THESE THREE STORAGE AREAS MUST NOT BE SEPERATED !!!! 

OPBFPT: .ASCII /2NZA/ 

OPBUF: .BLKB 82. ;BUFFER FOR OPERATOR SPEC'D MESSAGES 


; THE ABOVE THREE LINES MUST BE KEPT TOGETHER 


3 SSSA AAAAAAAAAAAAETARAEAAAAAREAAAERARHEARAAARHEERAAAHRARAHARERAAe AAS 


MSG8: .BYTE 33 RECEIVE BUFFER FILL PATTERN 
oe EVEN 





a | 


| CVCLH DPV=11 DATA COMM. LINK TEST MACY1T 30A(1052) 16-JUN-81" 19:00. PAGE 12-26 SEQ 0048 
/CVCLHBLPTT —-15=JUN=81 15:48 T MESSAGE DEFINITIONS AND TABLES 

4590 +4 seeeee oP PePPE TP PTET eee eSES EET TTT T See e ese es sesscss sss 

4591 yh Foit WING is. He AREA’ USED’ 10° TRANSMIT” AND’ REC’ THE’ 

0 Se Ne Bia Se Pappy ed ep e S ioe hn HE SYARY STACK. ACK” SEQUENCES. eIae é 

459% 002644 000 nak Hn gisiesseetaga fageeeessesssstetecctssazaae 


| 
| 4595 002645 201 E 201 CHAR 
4596 002646 000000 HDMCC : “WORD ? : CHAR gl 5 HERE 








Cee ae — 


4 
| CVCLHB DPV=-11 DATA COMM, LINK TEST MACY11 ay 16-JUN-81" 10:00 PAGE HE og SEQ 0049 


CVCLHB.P11 15=JUN-81 15:48 T MESSAGE DEFINITIONS AND TABLES 
4613 : COMMAND LINE BUFFER, DATA LOCATIONS AND MESSAGES FOR ACTION ROUTINES 
4615 002666 000122 CMDBUF: .BLKB 82. ;BUFFER FOR OPERATOR COMMANDS 
4616 003010 000000 KEYWD1: .WORD 0 ;THIS LOC WILL =1 IF CLEAR TYPED, 2 FOR SHOW, 
4617 A 4 IF RUN WAS TYPED, 5 IF HELP WAS TYPED 
4618 003012 000000 QUALFG: .WORD 0 “THIS LOC HOLDS QUALIFIER VALUE (SIZE OR COPY) 
4619 003014 000000 QUALVL: .WORD 0 
003016 012246 HLPTAB: .WORD HLP1 
4621 005020 01 <6! ;WORD HLP 
4622 0035022 01237 .WORD  4HLP 
4623 00: 01246 “WORD  HLP3A 
4624 003026 012510 “WORD HLP4 
4625 003030 012567 “WORD HLP4A 
4626 003032 012645 .WORD HLP5 
4627 003034 012735 .WORD HLP6 
4628 003036 HLPEND : 
4629 ; INDEX TABLE FOR REPORT "RPT>* HELP MESSAGES REV B EC 
4630 003036 013072 RHLPTB: .WORD RHLP1 
4631 003040 013114 .WORD  RHLP. 
463¢ 003042 013147 “WORD  RHLP 
4633 003044 01 ~WORD RHLPS 
rete 003046 RHLPEN: 
4636 003046 013266 Ose Ot stoS SHTYTB: .WORD SHTYPO, SHTYP1, SHTYP2, SHTYP3, SHTYP4, SHTYP5, SHTYP6, SHTYP7 
003054 013307 013314 013322 . 
— 003062 013327 013335 _ 2 
4638 3; THE tis) BYTES BELOW ARE THE FIRST BYTES OF THE PREDEFINED MESSAGES = 
rrr 3; USED *"SHOW’’ THE TRANSMIT AND COMPARE BUFFER CONTENTS. ; 
4641 003066 000 377 252 SHTAB: .BYTE 0,377,252,125,203.177,043 Y 
003071 125 203 17 
003074 043 
464 3075 SHTEND: 
464 003076 EVEN 
tees 003076 013346 MODES: .WORD M00 ZADDRESSES OF MODE TYPES IN ASCII 
4646 003100 013356 .WORD Ol 
4647 003102 013367 WORD moe 
4648 003104 013377 .WORD MO 
4649 0031 13406 .WORD 04 
4650 00311 013493 .WORD M05 
4691 00371 134 .WORD M06 
4653 003114 013437 LOOPS: .WORD LPO ZADDRESSES OF LOOP TYPES IN ASCII 
4654 003116 013647 .WORD LP! 
1633 oOaT 2 ot “WORD Le 
£697 003124 Seri .WORD LP 
4659 7COMMAND LINE TRAVERSE LOCATIONS (USED BY ‘PSTRV’" 
4661 0031 A: .WORD ZLOC. TO HOLD ADDR. OF CMD LINE BUFFER 
0031 PS$TREE: .WORD SLOC. TO HOLD ADDR. OF PARSING TREE 
4663 0031 PSACT: .WORD [LOC. TO HOLD ADDR. OF ACTION ROUTINE 
4664 0031 PSCNT: WORD [LOC. TO BE A COUNTER LOCATION 








4 ’ 
CVCLHB DPV=11 DATA Sa LINK TEST MACY11 Ty 16=JUN-81" 10:00 PAGE og SEQ 0050 
CVCLHB.P11 15=JUN=81 15:48 EFAULT MESSAGE DEFINITIONS AND TABL 


4665 003136 000000 P$NUM: .WORD 0 LOC. TO HOLD NUMERIC vee FROM PARSE 
ry | 003140 000000 PSRADX: .WORD 8 LOC. TO HOLD RADIX USED(LO) AND +/=(HI BYTE) 
4667 003 000 PSNNUF: .BYTE ;RETURN =0 IF ENOUGH OF COMMAND F OUND 

000 P$GDBD: .BYTE 0 [RETURN CODE 0 IF NO ERROR FOUND 








ee a ee a a ee — 
mM 4 

CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-29 SEQ 0051 
CVCLHB.P11 =: 15=JUN-81 15:48 MESSAGE BUFFERS AND POINTER TABLES 

4671 .SBTTL MESSAGE BUFFERS AND POINTER TABLES 

4673 003144 001000 TXBUF: .BLKB BUFLIM ; TRANSMITTER BUFFERS 

4674 004144 001000 RXBUF: .BLKB BUFLIM ;RECEIVER BUFFERS 

4675 005144 001000 CMPBUF: .BLKB BUFLIM ;COMPARISON BUFFERS 

4676 006144 000036 PTRTAB: .BLKW MSGLIM*2° 7 TABLE FOR MESSAGE ADDRS. & BYTE COUNTS 

4677 006240 000036 PTR13: | .BLKW MSGLIM* 

4678 006334 000036 PTR23: <BLKW MSGLIM* 

4679 006430 PTREND: ; END OF MSG. PTR. TABLE 

4681 006430 .BLKW 2 :FILLER FOR OVERFLOW OF RX POINTER TABLE 

dees 006434 RXPTR: .WORD 0 RECEIVER MESSAGE POINTER 

4684 006436 TXPTR: .WORD 0 STRANMITTER BUFFER POINTER 

4685 006440 CMPPTR: .WORD 0 [COMPARISON BUFFER POINTER 

4686 006442 CMPTOT: .WORD 0 [CMP MSG TOTAL 

4687 006444 CTOTCC: .WwORD 0 [COMPARE BUFFER CHAR. COUNT 

4688 006446 CCURAD: .WORD 0 [CURRENT ADDR OF CMP BUFF TO ADD AT 

4690 006450 DVTXA: .WORD 0 ;DEVICE TX ADDR 

4691 006452 DVTCC: .WORD 0 [DEVICE TX CHAR COUNT 

4692 006454 DVTCT: WORD 0 [DEVICE TX MESSAGE COUNT 

4693 006456 TXMTOT: .WORD 0 iT MSG TOTAL 

469% 006460 TTOTCC: .WORD. 0 X BUFFER CHAR. COUNT 

4695 006462 TCURAD: .WORD 0 «CURRENT ADDR. OF TX BUFF TO ADD AT 

4697 006464 DVRXA: .WORD 0 :DEVICE RX AD 

4698 006466 DVRCC: .WORD 0 [DEVICE RX CHAR COUNT 

4699 006470 DVRCT: WORD 0 “DEVICE RX MESSAGE COUNT 

4700 006472 RXMTOT: .WORD 0 [RX MSG TOTAL 

4702 006474 LNCNT: .WORD 0 :NUMBER OF OPERATOR AWAKE MSGS 

4703 006476 AR: .WORD 0 SOPTTIONAL VARIABLE LOCATION 

4704 006500 PSCNT: :WORD 0 [PASS COUNTER 

4705 006502 ERRCNT: .WORD 0 : ERROR COUNTER 

4706 006504 ADD: .WORD 0 [START ADDR. 

4707 006506 ENADD: :WORD 0 Hihy ADDR. FOR DUMP 

4708 006510 BYTBIT: .WwORD 0 ‘BYTE BIT FOR DUMP ROUTINE 

4710 ZOTHER MESSSAGE RELATED STORAGE LOCATIONS 

4712 006512 MSGTYP: .WORD 0 :TYPE OF DATA 0=0'S,1=1° S; 2=10'S, 3=01'S 

471 g=CCITT S=QuICK F Ox, Bek PMA, 7=0PER 

4714 006514 CURCC: . WORD STX/RX/CHP CHAR 

4715 006516 CPTRR: WORD SCURRENT RX Rx POINTER 

4716 006 CPTR:  .WORD [CURRENT POINTER 

4717 0065 CURADD: . WORD : CURRENT TX/RX/CMP START ADDD 

4718 0065 TOTCC: .WORD AL CHAR COUNT NOT MORE THEN "BUFLIM’’ 

4719 5 OFSET: :WORD : FFSET COUN 

4720 0065 TEMP:  .WORD : TEMPORARY NCAT IONS (USED A LOT) 

4721 0065 TEMP1: ;WORD 

4 3 0065 TEMP2: WORD 

4723 0065 TEMPS: =WORD 

4724 006 TEMP4: =: WORD 

4725 00654 TEMPS: =WORD 

4 006 CONOTM: _WORD ;CONTROL OUT ERROR MSG. ADDRESS 














CVCLHB DPV-11 DATA COMM, LINK TEST 
CVCLHB.P11 1Bayunser 5:48 


4727 006546 





000 
000 


MACY11 he 


CONTIN: .WORD 
GOOD : 
BAD: BYTE 


1 
GE BUF 
0 
Q 
0 





6 
F 


E 


N 4 
JUN-81 10:00 PAGE 12-30 


RS AND POINTER TABLES 


;WORD FOR CONTROL 
:BYTE TO HOLD EXPE 
;BYTE TO HOLD RECE 


SSAGE DATA BYTE FOR ERR REPORT 
SSAGE DATA BYTE FOR ERR REPORT 


aa 


SEQ 0052 































006566 000000 
4745 006570 000002 


CVCLHB DPV=11 DATA COMM. LINK TEST 
CVCLHB.P11 15-JUN=81 15:48 


MACY11 30A(1052) 


B 5 
16-JUN=81 10:00 PAGE 12-31 
MESSAGE BUFFERS AND POINTER TABLES 


MORE INDEPENDENT CODE STORAGE LOCATIONS 


MLTYP: 


FHDPLX: 
PARAM: 


RPASS: 
FLAG: 


:MODE DISPATCH TABLE 
MODE : RX 


«WORD 0 
-WORD 0 
-WORD QO 
«WORD Q 
-WORD 0 
-WORD QO 
-WORD QO 
«WORD 2 
«WORD 0 
-WORD 0 

. WORD ONL Y 
«WORD TXONLY 
-WORD PLCK 
«WORD ALCK 
-WORD DLL 
«WORD TALCK 
-WORD LISCK 


:LOC. TO HOLD LOGICAL UNIT NUMBER 

;LOC. HOLD PC OF CALLING ROUTINE 

: CLEANUP & EXIT FLAG -1 = EXIT TEST 

;LOC TO HOLD FLAG (-1) THAT A RESTART WAS GIVEN 
;DCLT MODE OF OPERATION TYPE 

; (Q=REC-ONLY, 1=TX-ONLY, 2=PASSIVE-LOOPBK, 

3. _3=ACTIVE=LOOPBK, 4= DOWN L.L., 5=TALK, 6=LISTEN) 
[MAINTENANCE LOOP TYPE (O=NONE, i= INTERNAL TTL, 
3 2=CABLE, 3=MODEM-ANALOG LOOPBK (LOCAL), 

:  4=MODEM-DIGITAL LOOPBK (REMOTE), 5=MOP) 
ort OR HALF DUPLEX FLAG (1=FULL FROM P=TABLE) 
PROGRAM PARAMETERS 

; BITO= STATUS MSGS TO OPR PRINTED (1=YES) 

; BITI= DATA CHECKING DONE ON RCVD MSGS (1=YES) 
; BIT2= ECHO (TRANSMIT) RCV'D MSG. (PASSIVE) (1=YES) 
; BIT3= MODEM STATUS CHECK (1=YES) 

; BIT4= CRC CALC./CHECK DONE (1=YES) 

; BITS= PROTOCOL EMULATION (1=YES) 

; BIT6= SPARE 

PASS NUMBER FROM RUN COMMAND 

;DEVICE FLAG WORD 


3RX ONLY DISPATCH 

TX ONLY DISPATCH 
PASSIVE LOOP BACK DISP 
ZACTIVE LOOP BACK DISP 
;DOWN LINE LOAD DISP 

; TALK MODE DISPATCH 
SLISTEN MODE DISPATCH 


CLOCK TABLES, EVENT LOG AND POINTERS 


0 
0 
0 
60. 
0 
0 
0 
0 
0 
0 
0 


;CLOCK CSR ADDRESS 


:CLOCK'S CSR VALUE TO INTRPT. ENABLE IT 
PLACE TO KEEP TIME-SINCE~START 

PLACE TO KEEP # OF TICKS/SEC 

EVENT TIMER #1 (TICKS) 


EVENT TIMER #2 (TICKS) 
EVENT TIMER #3 (SECONDS) 


SEQ 0053 









C 5 
CVCLHB DPV-11 DATA at LINK TEST MACY11 30A(1052)_ 16=JUN-81 10:00 PAGE gg 
CVCLHB.P11 15=JUN=81 15:48 CLOCK TABLES, EVENT LOG AND POINTER 


4782 ce LOG TABLE AND ITS NEXT ENTRY POINTER 

4783 006642 006644 EvT «WORD EVTLOG ;POINTER TO NEXT FREE SPACE IN EVENT LOG 

4784 006644 000341 EVILOG: -BLKW 225. ;EVENT LOG BUFFER 

pte 007546 000001 EVTEND: .BLKW 1. :APPROXIMATE END OF EVENT TABLE (ALLOWS CIRCULAR QUE) 
4787 .SBTTL MODEM DATA SECTION 

4788 


007550 000000 MODS: .WORD 0 ;MODEM STATUS 





SEQ 06054 





D5 
CVCLHB DPV-11 DATA COMM. LINK TEST MACY11 30A(1052)_ 16=JUN-81 10:00 PAGE 12-33 SEQ 0055 


CVCLHB.P11 15=JUN-81 15:48 MODEM DATA SECTION 
4793 
ria | ; TABLE OF MODEM SIGNAL BIT DEFINITIONS 
4796 007552 020000 MOBITS: .WORD CTS ;CLEAR TO SEND (CIRCUIT CB) 
4797 007554 001000 -WORD DSR SDATA SET READY (CIRCUIT CC) 
4798 007556 010000 -WORD DCD SDATA CARRIER DETECT (CIRCUIT CF) 
4799 007560 000004 «WORD RTS SREQUEST TO SEND (CIRCUIT CA) 
4800 007562 040000 «WORD RI ZRING INDICATOR (CIRCUIT CE) 
4801 007564 000040 -WORD SQD SIGNAL QUALITY DETECT (CIRCUIT CG) 
4802 007566 000040 -WORD SMODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM) 
nr 007570 MOBITE: 
4805 ; TABLE OF ADDRESSES OF MODEM SIGNAL MESSAGE POSITIONS 
4807 007570 016171 MOMSGS: .WORD EVMCTS ;CLEAR TO SEND (CIRCUIT CB) 
-WORD EVMDSR DATA SET READY (CIRCUIT CC) 
-WORD EVMDCD ;DATA CARRIER + i} SF eo CF) 
-WORD EVMRTS :RE T TO SEND (CIRCUIT CA) 
-WORD EVMRI RING INDICATOR (CIRCUIT CE) 
-WORD EVMSQD SIGNAL QUALITY DETECT (CIRCUIT CG) 
-WORD EVMTM [MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM) 
; TABLE OF ADDRESSES OF EVENT DESCRIPTION MESSAGES 
: ORDER CORRESPONDS TO MESSAGE TYPE VALUES 
EVTLST: .WORD EDTXQ et MESSAGE QUEVED 
«WORD EDTXC TRANSMIT OF MESSAGE COMPLETE 


-WORD EDRXQ SRECEI VE MESSAGE SPACE QUEUED 

“WORD EDRXC MESSAGE RECEIVED - RECEIVE COMPLETE 
WORD EDDER DEVICE INFORMATION 

WORD EDDVI ;DEVICE ae NE Ne FE a 


E 
WORD EDDLE ;DATA COMPARE LENGTH ERROR 
«WORD EDDDE ;DATA COMPARE DATA ERROR 
-WORD EDEOP ;END OF PASS 


LOCATIONS USED DURING EVENT REPORTING 


EVTSEC: .WORD 0 ; TEMPORARY LOCS TO KEEP EVENT TIME WHILE REPORTING 
EVTMIN: .WORD QO 
EVTTCK: .WORD 0Q 
EVTADD: .WORD 0Q TEMP. LOC. TO HOLD ADDRESS DURING EVENT REPORTING 
EVTBCT: .WwORD QO ; “- ** BYTE COUNT °° \on 7 


EVTTMP: .WORD 0 : “e '* OTHER DATA “* ee e 
;REPORT CODING DISPATCH TABLE 
RPTDSP: .WORD RPTTXQ ; TRANSMIT QUEUED ENTRY DECODING 


. E 

-WORD RPTTXQ TRECEIVER COMPLETE ENTRY DECODING 
-WORD RPTDER ;DEVICE ERROR ENTRY DECODING 
“WORD RPTDVI ;DEVICE INIT ENTRY DECODING 

«WORD RPTDCK ;DATA COMPARISON ENTRY DECODING 
“WORD RPTMSC ;REPORT MODEM STATUS CHANGE 





CVCLHB DPV-11 DATA COMM. LINK TEST 
CVCLHB.P11 48 


15=JUN-81 
021512 


iS: 


ey ee 


-_ 
MACY11 30A(1052)_ 16=JUN=81 10:00 PAGE 12-34 
MODEM DATA SECTION 


«WORD RPTDLE ;DATA COMPARISON LENGH ERROR 
«WORD RPTDDE ;DATA COMPARISON DATA ERROR 
-WORD RPTEOP ;END OF PASS 


DEV] -WORD 0 TEMP LOCS TO a DATA FOR EVENT REPORTING 
DEVe -WORD 0 ; AND SHOW MODE,... SUBROUTINE 

DEV3 «WORD 0 

DEV4 -WORD 0 


SEQ 0056 








| 5 | 
| CVCLHB DPV-11 DATA <a LINK TEST MACY11 30A(1052) 16-JUN-81" 10: 00 PAGE 12-35 SEQ 0057 
CVCLHB.P11 15=-JUN-81 15:48 COMMAND LINE ACTION TREE 


- SBTTL COMMAND LINE ACTION TREE 
; SAMPLE CLI TREE NODE (ALWAYS AT LEAST 1 WORD) 





: ! MISS DISPLACEMENT ! ONLY I ‘MISS'' ARGUMENT DEFINED 
; | NEXT NODE DISPLMNT $! ONLY IF ‘‘ASCII'' ARGUMENT DEFINED 
t ! ASCIZ MATCH STRING ! ONLY IF ‘‘ASCII'' ARGUMENT DEF INED 
: | (.EVEN) | 
CLITRE: 
SFIRST KEYWORD 
CL! CLISPA,O.N10$ :SKIP ANY LEADING SPACES 
N10$: CLI <'?>,HLP.NG2$ :1S THE FIRST NON-SP CHAR A ‘"2"' 
CLI CLIEXI 20 ;_ IF YES DO ‘MLP*’ AND EXIT 
N62$: (CLI CLISTR.HLP,N43$,<"HELP'> ZELSE, IS FIRST WORD A ‘HELP’ 
CLI CLIEXI.0 : IF YES DO ‘HLP’’ AND EXIT 
N43$: (CLI CLISTR.PRNT,N44$,<*PRINT "> ‘ELSE. IS FIRST WORD A 'PRINT’’ 
Cul CLIEXI.0 : IF YES DO 'PRINT'' E 
N4O6$: CLI CLISTR.EXIT,N45$,<"EXIT*> TELSE, IS FIRST WORD "EXIT’ :REV B BY EC 
CLI CLIEXI.O : IF YES DO ‘EXIT’’ AND EXIT 
N65S$: (CLI CLISTR.RUN,N4G6$,<*RUN'> SELSE, IS FIRST WORD A "RUN’’ 
CLI CLIBR, $ : JF YES DO ‘RUN’ & GOTO N80$ 
N66$: (CLI CLISTR,NOTNUF ,N4OS, <*DUMP*> SELSE. IS FIRST WORD A ‘DUMP’' 
CLI CLIBR,0,N5O$ : IF YES GOTO N80$ 
N60$: CLI CLISTR, CLEAR, N208, <*CLEAR'> TELSE. 1S FIRST WORD A ‘‘CLEAR’’ 
CLI CLIBR, NOTNUF .N100$ : IF YES DO ‘'CLR’’ & GOTO N100$ 
N20$: (CLI <'S>,NOTNUF ,N30$ TELSE, IS FIRST CHAR. A ‘'S’’ 
CL] CLISTR SHOW *N25$,<"HOW'> : JF YES IS REST OF WORD "}HOw"’ 
CLI CLIBR, $ : IF YES, DO ‘'SHOw’',BR N100$ 
N25$: CLI CLISTR y NOS, <'ET'> ; ELSE. IS°REST OF WORD "ET"' 
CLI LIBR, 0,N1108 IF YES, DO “‘SET’', BR N110$ 
N30$: CLI CLIERRLO” TOTHERWISE “ILL CMD'' = EXIT 
;SECOND KEYWORD (MODE=) FOR RUN COMMAND 
N80$: CLI CLISPA,0,N30$ :SKIP LEADING SPS, IF NONE-ERR 
N81$: CLI CLISTR.NOTNUF ,N30$,<"MODE "> ‘1S NEXT WORD ' MODE="" 
CLI <'=>,0.N30$ ; _IF_NO, IT'S WRONG -ERR ~EXIT 
Cll CLISTR ATVMOD , N82$,<'ACTIVE’> 31S NEXT WORD ‘‘ACTIVE’' 
CLI CLIBR,O.N115$ ; IF YES, DO ‘‘ACTIVE'',BR N115$ 
N82$: (CLI CLISTR PASHOD N83$,<"PASSIVE'> 1S NEXT WORD ‘PASSIVE’ 
CLI CLIBR,O.N : IF YES, DO ‘'PASSVE''.BR N115$ 
N83$: (CLI CLISTR,R Pjbks ¥ NB4$,<"RECEIVE'> 1S NEXT WORD ‘RECEIVE 
CL! LIBR,O,N11 : JF YES, DO ‘RECVE'.BR N115$ 
N84$: (CLI ctIs STR.LI TSMOD. NBS$,<*LISTEN'> 31S NEXT WORD “LISTEN” 
Cul CLIBR,O.N115$" F YES, DO "LISTEN'',BR N115$ 
N85$: (CLI CLISTR,OLLMOD ,N86$,< *DOWNL INELOAD*> 1S NEXT WORD what 
Cul CL iar, Ni138 IF YES, DO ‘DWALL'.BR Ni15$ 
N86$: (CLI <*T>,0.N SIS NEXT CHAR A ‘'T' 








r 
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MACY11 30A(1052) 16-JUN-81° 10:00 PAGE 12-36 SEQ 0058 
COMMAND 


LINE ACTION TREE 
CLI CLISTR,TRAMOD,N87$,<'RANSMIT'> ; IS REST OF WORD ‘RANSMIT 
CLI CLIBR,O,N11 ; "TR 
N87$: CLI CLISTR, FALMOD, N30$,<'ALK'> ; IS REST OF WORD ‘‘ALK 
CLI CLIBR,O,N115$ r 
: IF NO, ERROR = EXIT 
;SECOND KEYWORD (FOR CLEAR_OR SHOW) 


N100$: CLI CLISPA,0,N30$ , SKIP LEADING age hE NONE =ERR 
N102$: CLI CLISTR.CSHEXP,N104$,<"EXPECTBUFF *> 71S NEXT WORD ‘EX 


P 
CLI CLIEXI,0 : IF vere DO CLR-EXP, Exit 
N104$: CLI CLISTR., CSHTRN,N30$, <* TRANSMI TBUFF "> 71S NEXT WORD ‘‘TRANS.. 
CLI CLIEXI,0 ;_ iP my DO CLR-TRN,EXIT 
7 IF NO = ERROR =- EXIT 
; SECOND KEYWORD (FOR SET) 
N110$: CLI CLISPA,0,N30$ 
N111$: CLI CLISTR SETEXP., N112$,<"EXPECT*> 
CLI CLIBR, 
N112$: CLI CLISTR SETTAN, N30$,<' TRANSMIT > 


CLI CLIBR,O,N12 


;GET eet FOR DUMP COMMAND 
N50$: CLI CLIALP,0,N51$ 
N51$: CLI CLISPA,0,N52$ 
NS2$: oe CL J0CT  Orvs Moos 


CLI </> -NOTNUF °N125$ 
CLI <'B>. DMPQ,N30$ 
CLI CLIBR,O, Nioes 


:QUALIFIERS FOR THE RUN COMMAND 
N115$: CLI CLIALP,0,N114$ 
N114$: (CLI <‘*/>, NOTNUF N125$ 
CLI CLISIR, NO,N116$,<'NO'> 
N116$: CLI <*C>,0.N117$ 
CLI CLISTR CHECK N117$,<"HECK*> 
CLI CLIBR,O.N115$ 


N117$: CLI CLISTR STATUS, N118$,<*STATUS"> 
CLI CLIBR, 

N118$: CLI CLISTR écHO N130$,<"ECHO'> 
CLI CLIBR,O,N115$ 


N130$: CLI CLISTR,O, N1328, <"PASS"> 
CLI CLIBR,O.N 


N132$: CLI CLISTR,MOSC ,N131$,<*MODEM'> 


CLI CLIBR,O.N115$ 
N131$: CLI CLISTR,O,N30$,<"LOOP"> 





Fhemrtnionpensciaritmsicietaeeeeeenentinroahiomenin 
| ‘ 
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4991 010716 CLI CLIBR,0,N140$ 
4993 :GET MESSAGE TYPE FOR SET MESSAGE COMMANDS 
4994 010722 5, N120$: CLI =>,0,N30$ 
4996 : LOOK FOR DEFAULT MESSAGE NAME 
4997 010726 N60$: CLI CLISTR, CMSG1,N61$,<"ONCS'> 
4998 010742 CLI CLIBR,O,N121 
4999 010746 N61$: CLI CLISTR, CMSGO,N62$,<" ZEROES '> 
5000 010764 CLI CLIBR,O,N1 
5001 010770 | N62$: CLI CLISTR CmsGe. N63$,<"TALT"> 
5002 011004 CLI CLIBR,O,N121 
5003 011010 N63$: CLI CLISTR eMsGS N64$,<"OALT"> 
5 11024 CLI CLIBR,O,N121$ 
5005 011030 N6O4$: CLI - CLISTR euses N65$,<"ITEP"> 
5006 011044 CLI CLIBR,O,N121 
5007 011050 N65$: (CLI CLISTR, CMSG4 ,N6O6$,<'CCITT'> 
5008 011064 CLI CLIBR,O,N121$ 
5009 011070 NO6$: (CLI CLISTR, CMSG6,N67$,<"ALPHA'> 
5010 011104 CLI CLIBR,O,N12 
5011 011110 N67$: CLI CLISTR SETET,N68$,<"TRANSMIT’> ;REV B BY EC 
5012 011130 CLI BR. 0. N12 25$ 
5013 : LOOK FOR auoTED. me 
5014 011136 N68$: CLI Fs GPRMSG .N3OS 
5015 011140 N70$: (CLI <5" ENDQO N71$ 
5016 011146 CLI CLIBR,O,N121$ 
5017 011150 N71$: CLI CLISPA,O,N72$ 
5018 011154 N72$: (Li CLIALN.O.N73$ ZONLY A=2,SP,TAB, OR 0-9 BETWEEN ‘"'S 
5019 011160 CLI CLIBR,O.N 
3020 011164 N73$: (CLI CLIERR-BADCHR :PRINT ERROR iF NONE LEGAL CHAR FOR ‘"'S 
5022 :GET QUALIFIERS (SIZE OR COPY) FOR SET MESSAGE COMMANDS 
5023 011166 N121$: CLI CLIALP.0.N123$ 
5024 011172 N1D38, Cll <'/>,NOINUF ,N125$ 
5025 011176 CL! CLISiR SIZE.N122$,<'SIZE*> 
5026 011212 CLI LIBR,O.N1 
5027 011216 N122$: CLI cListh.6 Qcopy N30$,<'COPY'> 
5028 011232 CL! CLIBR,0,N126$ 
5030 :NUMER FOR SIZE oR copy 
5031 011236 N126$: CLI N30$ 
3032 011242 CLI pee? NUM, N30$ 
3033 011246 CLI CLIBR,O,N121$ 
5035 :GET MAINTENANCE LOOP TYPE FOR RUN "LOOP’’ QUIALIFIER 
5036 011252 N140$: CLI <*=>,0,N30$ 
306 
5047 011256 N141$: CLI CLISTR TUL .N142$,<* INTERNAL TTL *> 
5048 011 CLI CLIBR,O,N115$ 
5049 011304 N142$: CLI CLISTR éBLL .N143$.<" CABLE "> 
5050 011320 CLI CLIBR,O,N11 
5051 011324 N143$: (CLI CLISTR gL MDL on. N144$,<*LOCALMODEM’ > 
5052 011346 CLI cLIBR 
5053 011352 N1464$: (LI ar .6 AOL oF, N30$,<*REMOTEMODEM’ > 
5054 011374 Cl et Jar. 6.N115$ 
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COMMAND LINE ACTION TREE 


:GET LINE NUMBER FOR ''PASS'’ RUN QUALIFIER 
N150$: CLI <'=>,0,N30$ 
CLI CLIDEC {PASC .N30$ 
CLI CLIBR, 6.N115$ 


CLIEXI,0 


SEQ 0060 


es ee eee ee [ 
5 

CVCLHB DPv=11 DATA COMM, LINK TEST MACY11 30A(1052) 16-JUN-81" 10:00 PAGE 12-39 SEQ 0061 | 
CVCLHB.P11 15=JUN-81 15:48 COMMAND LINE ACTION TREE | 

5077 

5078 

5079 DEVICE DEPENDENT STORAGE LOCATIONS FOR 

5080 ; CURRENT DEVICE PARAMTERS 

rite 

s08 011416 000000 RXCSR: .WORD 0 ;REC CONTROL AND STATUS 

5084 011420 000000 PCSAR: .WORD 0 SSTATUS REGISTIER 

5085 011422 000000 RDSR: .WORD OQ SREC DATA AND STATUS REG 

5086 011424 000000 TXCSR: .WORD 0 ; TRANSMIT AND REC. CONTROL 

ste 011426 000000 TDSR: .WORD O : TRANSMIT DATA AND STATUS REG 

5089 

5090 011430 000000 «WORD 0 ; INPUT INTERRUPT VECTOR ADDRESS 

5091 011432 000000 OUTVEC: .WORD 0 SOUTPUT INTERRUPT lee ADDRESS 

5092 011434 000000 INTPRI: .WORD 0 ; INTERRUPT PRIORITY 

oer 011436 000000 OPTYP: .WORD 0 [DEVICE OPTION TYPE(O=DMC,5=DMR=DMC MODE 

5095 011440 065626 DPVP1: .WORD 065626 sTHIS WORD IS A - DOWN AS FOLLOWS 

5096 BITS Q-7 =SYNC 

5097 ‘BITS 8-10=ERR DET SELECTED 

5098 THIS IS set TO SYNC 262 :BIT11 = IDLE 

5099 ZCRC 16 INIT TO 1 : iTi¢ = SEC ADDR. MODE 

5100 :STRIP SYNC AND BCP MODE ;B1T15 = STRIP SYNC 

5101 ‘IDLE SET TO MARK 3;B1T14 = PORTO TYPE SEL(1=8CP O=BOP) 

2108 ;BIT15 = ALL PARTIES ADDRESS.. 

3104 

5105 011442 000000 S: .WORD 0 ; CURRENT MODEM 

5106 011 000000 IRXCSR: .WORD 0 ; IMAGE OF RXCSR 

5107 011446 000000 IRDSR: .WORD 0 IMAGE OR RDSR 

5108 011450 000000 MSGPTR: .WORD 0 7MSG PTR.FOR HEADER OR CONTROL 

5109 011452 000000 MSGCC: .WORD 0 7MSG COUNTER OR CC 

5110 011454 000000 $s : ,WORD O 3 CHAR . 

5111 011456 000000 SYNCW: .WORD 0 s -PLUS TSOM BIT. 

aii¢ 011460 000000 «WORD 0 MSG PTR FOR RE 

5113 011462 000000 RMSGSCC: .WORD 7CHAR COUNTER FOR REC 

5114 011464 000000 BCCW - WORD CRC HOLDING LOC. 

5115 011466 000000 MGLCNT: WORD ; COUNT OF GLITCH ERRORS 

5116 011470 000000 MHRCNT: WORD 8 ; COUNT OF HARD ERRORS 

ay 011472 000000 - WORD 7 1=REMOTE NODE ITEP,O=NON ITEP 

5140 

5141 3 ERRTBL 





ee — — 
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5143 -SBTTL GLOBAL TEXT SECTION 


44 

5145 i++ 

5146 t THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
5147 : MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 

4 > MORE THAN ONE TEST. 


» SBTTL DEVICE SUPPORTED 
> NAMES OF DEVICES SUPPORTED BY PROGRAM 


> 
Oc 


SF RAOIS 


wewvwv'l 


474 DEVTYP <DPVy-11> 
474 LSDVTYP:: 
474 050104 026526 030461 «ASCIZ /DPV=-11/ 


011504 «EVEN 


MwWWwSs 


- SBTTL PROGRAM IDENTIFICATION 
; TEST DESCRIPTION 


504 DESCRIPT <DPV-11 DATA COMM LINK TEST > 

504 LSDESC:: 
504 

512 


et at et RS 


PVH YL EHARAVF 


050104 026526 030461 -ASCIZ /DPV-11 DATA COM 
oes 


046040 
042524 


ooooocoo 
aatad badad ad 


EVEN 


87 











| 
i 3 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 1241 SEQ 0063 
CVCLHB.P11 —- 15=JUN-81 15:48 GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 
5189 .SBTTL GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 
| 5194 011540 0415 4 052114 000076 CLISPM: .ASCIZ /DCLT>/ 
5195 011 050122 03 124 990 CLISRP: .ASCI2 /RPT>/ EV B BY EC 
5196 01155 045 022516 037501 CLIERM: .ASCIZ /%NZA7ILL cmo-pab SYNTX?/ 
5197 01160 7048 02251 057501 CLINUF: .ASCI2 /%N%A?INCMPLTE CMD?/ 
5198 011626 047045 040445 047077 CLINBG: .ASCIZ /%N%A?NUM TOO 836?/ 
5199 011650 047045 040445 041077 CLIBRX: .ASCIZ /ZN%A?BAD RADIX?/ 
5200 011670 047045 040445 021077 CLIBDL: .ASCIZ /INTA?" LOOP" VALID ONLY IN ACTIVE?/ 
5201 011 047045 06 1 CLINPS: .ASCIZ /%NZA?"ECHO'’ VALID ONLY IN PASSIVE?/ 
3208 011 045 022516 037501 CLIBCR: ASCIZ / VENEA? LL CHR- An2-0-9,SP, TAB’' ONLY?/ 
5203 012042 047045 04044 021077 CLISEO: .ASCIZ /%N%A?''SIZE=0"" NOT VALID?/~ 
5204 01207 045 022516 037501 CLIPW: .ASCIZ /%NZA?TRANSMIT e Expect LIST Must BE IDENTICAL FOR LOOP?/;REV B EC 
5205 O1gi63 045 022516 952101 HLPO:  <ASCIZ JINTATHIS IS DCLT. TYPE "H’' OR ''?'’ FOR DETAILS/ 
5206 012241 045 022516 0001246 HLPF: <ASCIZ /%N%T/ 
5307 012246 041504 0521146 041440 HLP1:  .ASCIZ /DCLT CMDS:/ 
5208 012261 040 046103 9505 HLP2:  <ASCII / CLEAR OR SHOW EXPECTLIST OR TRANSMITLIST/<15><12> 
5209 012335 040 051120 111 "ASCII = / PRINT/<15><12> 
$210 012345 040 0541 $2111 "ASCII 4 EXIT/<19><12> ;REV B EC 
5211 012354 0 046525 020120 "ASCIZ ? DUMP START-END/B? 
5212 012376 051440 05 198 04 440 HLP3:  .ASCIZ2 ? SET EXPECTMSG OR TRANSMI TMSG=1YPE/SIZE=N OR /COPY=N? 
5213 01246 040 04252 124 HLP3A: .ASCIZ / SET EXPECT=TRANSMIT/ ; 
5214 012510 020060 052040 050131 HLP4: .ASCIZ ?  TYPE=ONES,ZEROES, lat GALT ITEP, CCITT ALPHA? 
5215 012567 040 02004 O HLP4A: .ASCIZ / OR ‘OPR =A-2,5P,1AB,0-9 IN QUOTES''/ 
5216 012645 040 05252 116 HLPS: .ASCIZ2 ? RUN MODE=MTYP/LOOP=LTYP/CHECK.STATUS..ECHO,MODEM,PASS=N? 
5217 012735 040 020060 052115 HLP6: ‘ASCI] / MTYP=TRAN,REC,ACT,PAS, TAL,LIS,DOWN/<15><12> 
3218 01 020040 046040 054524 "ASCI12. / LTYP=INT,CAB.LOC,REM/ 
5220 013034 047045 0460645 05465246 RHLPO: .ASCIZ /2NZATYPE wt" OR *3"* FOR WELP!/ ;REV B EC 
5221 013072 041504 052114 051040 RHLP1: <:ASCIZ /DCLT REPORT CMDS: VBE 
3222 013114 047514 920107 RHLP2: <ASCIZ /LOG = PRINT DCLT ‘event L067" :REV B EC 
5223 013147 105 0445 124 RHLP3: .ASCIZ /EXIT = EXIT REPORT L :REV B 
20 01 042510 050114 RHLP4: .ASCIZ /HELP = PRINT THIS MESSAGE? Mae BEC 
26 013232 047065 040445 051515 : ASCH ?ENZAMSG: TYPE=%T%A/S12E=%D3? 
5227 013266 042552 047522 051508 TYPO: .ASCIZ /ZEROES/ 
28 013275 17 042516 123 SHTYP1: .ASCI2 /ONES/ 
1 040461 114 SHTYP2: .ASCIZ /1ALT/ 
13 060 101 000124 SHTYP3: .ASCIZ /OALT/ 
1 013314 041 111 000124 SHTYP4: -ASCIZ /CCITT/ 
52 13322 052111 105 SHTYPS: .ASCI2 /ITEP/ 
52 1332 101 114 10 SHTYP6: _ASCI 
5234 013235 117. 0511 1 SHTYP7: .ASCI C/ 
5 13346 942522 $ O53111 MO: — -ASCIZ /RECELVE/ 
52 1 56 11 101 523 MOI:  .ASCI It/ 
5237 13367 1 1501 4 moe: “ASCI ASSIVE/ 
5238 0133 101 1 3 53111 MO3:  .ASCIZ /ACTIVE/ 
5239 01 04 1 514 M04:  .ASCIZ /DOWNLINELOAD/ 
1 1 101 113 MOS "ASCIZ2 /TALK/ 
1 01 044514 123 1 “ASCIZ. /LISTEN/ 
g 1 L “ASCI2 // 
5243 01 7517 036520 L “ASCIZ (2/ ? 
5264 01 111 05211 1105 LP1: <.ASCIZ ?INTERNAL? 
5 01 3 10 105 LP2:  .ASCIZ2 CABLE? 
5 1 14 04050 514 LP3:  :ASCI2 ?LOCALMODEM? 
5247 013501 122 117 LP4: ASCI2 ?REMOTEMODEM? 
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5248 013515 11 117 PNST: .ASCII /NO/ 

5249 013517 123 040524 052524 PST: eASCIZ = /STATUS/ 
5250 0135 047516 PNCK:  .ASCII /NO/ 

5251 Oi 32 044103 041505 000113 PCK: eASCIZ = /CHECK/ 
5252 0135 047516 PNEC: .ASCII /NO/ 

525 Oi seek 041505 067519 000 PEC: eASCIZ = /ECHO/ 
5254 013545 116 11 PNMS: .ASCII /NO/ 

$52? 013547 115 042117 046505 PMS: eASCIZ /MODEM/ 
5257 

5268 

5269 013555 045 0 $318 046101 LISP: .ASCIZ 1 pial 
5270 013566 046124 03711 000 OPRMM: .ASCIZ 

5271 013573 i$s 4510 020125 15060: .ASCIZ iTHIS. A 50. OR 60. HZ. LSI-11:/ 
527. 0136 -EVEN 


52 + FORMAT STATEMENTS USED IN PRINT CALLS 


2 
e 
i 
i 
2 
3 
4 
3 
. 
2 
2 
3 
& 


/2NZADOWN LINE LOAD NOT SUPPORTED BY THIS DEVICE/ 


/INZACLOCK NOT FOUND/ 
/INZABAD CLOCK 


047045 040445 046103 BDCLK: .ASCIZ i 
5298 013736 047045 040502 NOCLK: °ASCIZ = PROGRAM WILL HANG ON "'TIMEQUT’'! !/ 
Q14017 115 054101 020056 TABEX: -ASCIZ /MAX. CHAR. MSG COUNT EXCEEDED ~/ 
Q14057 102 042506 BUFEX: :ASCIZ /BUFFER FULL - 
5301 014075 04 CZ /INSTEA MSG. NOT BUILT !!/ 


T 
: /INZACHAR. COUNT EXCEEDS BUFF LIMIT = MSG TRUNCATED/ 
022516 032525 SHFO: .ASCIZ ?2NZSSZAMODE=272T THA/PASS=225? 


Ss 
= 
& 
4 
85 


a310 014247 045 022516 032523 SHF1 eASCIZ PENZSSZSSZSSZA/ATAA/ATAA/ATAA/2T? 

tat 4 014307 045 Osraee 040445 EFM2: .ASCIZ /ZSSZATOTAL ph N we = %D5/ 

5313 014352 047045 05144 22465 PCPM: .ASCIZ /ZNZS3ZACALLED FROM PC 

5314 014404 051445 022465 1501 EFM11: .ASCI 7455 2ACOMPARE COUNT =4D5%5 LARECEIVE COUNT=%D5/ 
5315 014461 115 042117 6505 oe -ASCI pa ley US CHANGES FOR PASS WERE../ 
2318 014533 045 032523 06046465 EFMI5: .ASCIZ /2S5 CHANGE SSDSHARS SEAGLITCHES=2D5/ 
5318 

2 19 EVENT DESCRIPTION MESSAGES 
5321 EDTXQ: .ASCI Amman as} MSG QUEUED/ 

5 § EDTXC: .ASCIZ /TRANSMIT MSG COMPLETED/ 

532 EDRXQ: .ASCIZ /RECEIVE SPACE QUEUED/ 

5 EDRXC: .ASCIZ /RECEIVE MSG COMPLETED/ 

5 EDDER: .ASCIZ /DEVICE ERROR/ 

5 EDDCK: .ASCIZ /DATA COMPARISON STARTED/ 

5 EDDVI: .ASCIZ /DEVICE INIT AND SETUP/ 

EDDLE: .ASCI DATA COMPARISON LENGTH Oy pal 

34 EDDDE: .ASCIZ /DATA COMPARISON DATA E 

3 EDEOP: .ASCIZ /END OF PASS/ 

5331 EDMOS: .ASCI2 /MODEM STATUS CHANGE/ 
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Bs 
leleleleleolelelololeio) 
2234354352353 54524 


016352 


016363 
0164611 


RET aaa ERE REM REET tages 
ooocso 
o 
a3 
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So 
SSLRRLEL 


GER 


= 
- 
PUP PPSA ISI 


NA 
££ 2 888 


RR 
S Saeeeeeets 


SSsseR 
RERERERES 


— 
PAAAAAMAY 


— 


g 
3 


—— 
~~ 
ww 


022516 031523 
022465 041101 
022516 034523 


051445 022470 
oo 022471 


0 040 

040 040 

040 040 

040 040 
040 04 
040 04 

040 040 
031 044 


022463 046501 


e511? 946505 


SEQ 0065 
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EVENT REPORTING ME sags 
BASM3: .ASCIZ /%S3%03/ 
BASM2: .ASCIZ /2%S3%06/ 
BASM1: .ASC /2N%06/ 
NULEVT: .ASCIZ /%NZATHE DCLT EVENT LOG IS EMPTY/ 
EVTFO: .ASCIZ /2ZNZA>>> DCLT EVENT 40% ENTRY <€€€e eK EEE E666 E EKER EKER KKK / 
EVTF1: .ASCIZ A x oh %A:%Z22%S52T/ 

: ASC /EINZS3ZAADDR OF MSG=%O06%S3ZABYTE COUNT=%D5/ 
EVTF3: .ASCIZ /2NZS3ZT2ZN/ 

i" A sted 

EVTF3D: .ASCIZ (esoepess %06%S32T/ 

: .ASCIZ /2NZS3ZAADDR OF MSG=%06%S3ZABYTE COUNT=%D5%S3ZANO. OF CMP ERRS=%D5/ 
EVTF4A: .ASCIZ /2NZS3ZAADDR OF MSG=Z06%S3ZARX BYTES=%D5%S35ZACOMPARE BYTES=%D5/ 
EVTF4B: .ASCIZ /2NZS3ZAPASS=2%D52S32ZAERRORS=2D52S 3ZASTRI-T0=%D5/ 
EVTFSA: .ASCIZ /2SSZABYTEM IN MSG. =2D52%S3ZAEXPTD=%03%S 3ZARECVD=%03/ 
EVMOCG: .ASCIZ /%NZS9ZACHANGED T0:/ 


3 REE ARAAAAAAAARERAEAERAEEAAAEAEAEARAAAAAAAEARAEAEAERAARAAAEEAREEEEEEEE 


D0 NOT SEPERATE THE NEXT LIST GF MESSAGES - MODEM SIGNAL HEADER AND REPORT 


FVMOHD: .ASCIZ fe eb er + peste CTS DSR DCD RTS RI SQD TM/ 


EVMCTS: .BY x,40,40,40 
SR: .BYTE ‘'X,40,40,40 
EVMDCD: .BYTE ‘X,40,40,40 
EVMRTS: .BYTE X,40,40,40 
EVMRI: .BYTE ‘'X,40,40,40 
EVMSQD: .BYTE  ‘'X,40,49,40 
40,40,40 


EVMIM: .BYTE ot 


zEXECUTION STATUS MESSAG' [0 BE PRINTED TO KEEP OPERATOR AWAKE 
CR: ASCIZ / CR FOR ig: LA ROW 


STxXQ: .ASCIZ /2ZS3ZATXQ/ ;ABOUT T 
STXC: eASCIZ /2S3ZATXC/ 37x COMPLETED 
SRXQ: .ASCIZ /2ZS3ZARXQ/ z;ABOUT TO RECEIVE 
SDVE: -ASCI /ES3ZAERR/ DE ERROR 
SCM: -ASCI /ESSZACMP/ 3 TO DO DATA CHECKING OF RECVD VS. EXPTD 
SDVI: .ASCIZ /2S3ZAINI/ *DEVICE ABOUT TO BE INITIALIZED 
SCML: ASCI /ES3ZACML/ ; COMPARE LENGTH ERROR 
SCMD ASCI /ZS35ZACMD/ ; COMPARE DATA ERROR 
ASCI /ESS5ZAE0P/ sEND OF PASS 
EVEN 
SMSC: eASCIZ /2S3ZAMSC/ ZMODEM STATUS CHANGE. 


GLMSG: ASL /MODEM STATUS GLITCHED/ 
HROMSG: “ASCI2 /MODEM STATUS HARD ERROR/ 











B 6 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN=81 10:00 PAGE 12-44 SEQ 0066 
CVCLHB.P11 15=JUN=81 15:48 GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 


5402 

5421 

5422 016441 115 051501 042524 DVEMO: .ASCII] /MASTER RESET DID NOT WORK/ 

5423 016472 005015 02004Q 051040 eASCIZ <15><12>/ __RXCSR TXCSR / 

5424 016520 047516 041440 042514 DVEM1: .ASCII /NO CLEAR TO SEND ~~ “es / 

5425 016554 005015 0040 051040 eASCIZ <15><12>/  RXCSR TXCSR 

5426 016602 0445246 042515 047440 DVEM2: .ASCII /TIME OUT WAITING FOR 2X y 1% TO COMPLETE/ 
27 016653 015 020012 020040 eASCIZ <15><12>/_ _—_—RXCSR TXCSR/ 

5428 016677 103 041522 044440 DVEM3: .ASCII /CRC IN ERROR/ 

5429 016713 015 020012 020040 eASCIZ <15><12>/ — RDSR RXCSR/ 

016737 122 1505 044505 DVEM4: .ASCII /RECEIVER OVERRUN/ 

5431 016757 015 .020012 020040 eASCIZ <15><12>/  —_RDSR XCSR/ 

5432 017003 124 046511 042105 DVEMS: .ASCII /TIMED OUT IN START, gins? ACK SEQ/ 
33 017043 015 020012 020040 eASCIZ <15><12>/_ = RDATA SDATA/ 

5434 017067 115 042117 646505 DVEM6: .ASCII /MODEM_ DID NOT RETURN ong 2h READY/ 

015 020012 020040 eASCIZ <15><12>/ = RXCSR TXCSR/ 





5435 017127 
5436 











C 6 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) paketit 10:00 PAGE 12-45 SEQ 0067 
CVCLHB.P11 15=JUN-81 15:48 GLOBAL ERROR REPORT SECT 


5476 .SBTTL GLOBAL ERROR REPORT SECTION 

5478 p++ 

5479 : THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 

5480 * USED BY MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINT 

3481 > (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 

5483 

5484 

5485 

5486 

5502 

5503 017154 BGNMSG ERR1 
(3) 017154 ERR1:: 

5504 017154 PRINTB #EVTFSA,OFSET,<B,GOUD>,<8,BAD> ; INDIVIDUAL DATA COMPARE ERROR 
(10) 017154 005046 CLR -(SP) 
(10) 017156 153716 006551 BISB _—BAD,, (SP) 
(9) 017162 005046 CLR -(SP) 
(9) 017164 153716 006550 BISB GOOD, (SP) 
(8) 017170 013746 006526 MOV OF SET. -(SP) 
(7) 017174 012746 015766 MOV MEVTF5A,-(SP) 
(6) 017200 012746 000004 MOV #4 ,-(SP) 
(3) 017204 0106 MOV SP.RO 
(4) 017206 104414 TRAP — C$PNTB 
(4) 017210 062706 000012 ADD #12,SP 

5505 017214 ENDMSG 
(3) 017214 L10001: 

mt) 017214 104423 TRAP _ C$MSG 

5507 017216 BGNMSG ERR2 
(3) 017216 . ERR2:: 

5508 017216 PRINTB #EFM2, TEMPS : TOTAL DATA COMPARE FAILS ERROR 
(8) 017216 013746 006540 TEMP4 ,~(SP) 
(7) 017222 012746 014307 MOV #EFM2,-(SP) 
(6) 017226 012746 000002 MOV #2,-(SP) 
(3) 017232 010600 MOV t 
(4) 7234 104414 TRAP — C$PNTB 
(4) 017236 062706 000006 ADD #6,SP 

5509 017242 ENDMSG 
(3) 017242 110002: 

53 017242 104423 TRAP _ C$MSG 

5511 017244 BGNMSG ERR10 
(3) 017244 ERR10:: 

5512 017244 PRINTB #EFM11,R4,TEMP3 :LENGH COMPARISON ERROR 
(9) 017244 013746 006536 MOV TEMP3,-(SP) 
(8) 017250 010446 MOV R4,-(SP) 
(7) 017252 012746 014404 MOV #EFM11,-(SP) 
(6) 017256 012746 000003 MOV #3,-(SP) 
(3) 017262 010600 MOV SP-RO 
(4) 017264 104414 TRAP . C$PNTB 
(4) 017266 062706 000010 ADD #10,SP 

5513 017272 ENDMSG 
(3) 017272 L10003: 


017272 TRAP CSMSG 


D 6 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) Patt 10:00 PAGE 12-46 SEQ 0068 


CVCLHB.P11 15=JUN-81 15:48 GLOBAL ERROR REPORT SECTION 

5515 017274 BGNMSG ERR 
(3) 017274 ERR4:: 

5516 017274 PRINTB #EFM13,MHRCNT,MGLCNT ;MODEM STATUS CHANGE 
(9) 017274 013746 011466 MOV MGLCNT,=(SP) 

| (8) 017300 013746 011470 MOV MHRCNT.=(SP) 

(7) 012746 014533 MOV #EFM13,-(SP) 
(6) 017310 012746 03 MOV #3,-(SP) 
(3) 017314 MOV i 
(4) 017316 104414 TRAP —- C$PNTB 
(4) 017320 062706 000010 ADD #10,SP 

5517 017324 ENDMSG 
(3) 017324 L 10004: 
(3) 017324 104423 TRAP —- C$MSG 

5518 | 

5519 

5529 

5530 ‘ 

5531 sPRINT THE 2 OCTAL #'S IN TEMP3/4 

5532 y 

5533 

5534 017326 BGNMSG ERR13 
(3) 017326 ERR13:: 

5535 017326 PRINTB #EVTF3C,TEMP3, TEMPS 
(9) 017326 013746 006540 MOV TEMP4 , (SP) 
(8) 017332 013746 006536 MOV TEMP3,-(SP) 
(7) 017336 012746 015450 MOV #EVTF 3C,-(SP) 
(6) 017342 012746 000003 MOV #3,-(SP) 
(3) 017346 010600 MOV SP.RO 
(4) 017350 104414 TRAP  C$PNTB 
(4) 017352 062706 000010 ADD #10,SP 

5536 017356 ENDMSG 
(3) 017356 L10005: 
(3) 017356 104423 TRAP —- C$MSG 

5537 

5538 

5539 “PRINT THE 2 OCTAL #'S IN TEMP3/4 

3379 ; AND THE MESG. WHOSE ADDR. IS IN CONOTM 

5542 

5543 017360 BGNMSG ERR14 
(3) 017360 ERR14:: 

5544 017360 PRINTB #EVIF3D,TEMP3, TEMP4,CONOTM 
(10) 017360 013746 006544 MOV CONOTM, -(SP) 
(9) 017364 013746 006540 MOV TEMP4 ,-(SP) 
(8) 017370 013746 536 MOV TEMP3,-(SP) 
(7) 017374 012746 015465 MOV #EVTF 3D,-(SP) 
(6) 017400 012746 MOV #4,-(SP) 
(3) 017404 0 MOV ‘ 
(4) 017406 104414 TRAP  C$PNTB 
(4) 017410 062706 000012 ADD #12,SP 

5545 017414 ENDMSG 
(3) 017414 L 10006: 

53) 017414 104423 TRAP  C$MSG 

5547 017416 EXIT MSG 


(4) 017416 000167 «WORD J$JMP 





CVCLHB DPV-11 DATA oo LINK TEST 
CVCLHB.P11 15=JUN=81 15:48 


(3) 017420 177772 
5548 
5549 





E 
MACY11 30A(1052) _16=JUN-81 


GLOBAL ERROR REPORT SECTION 


6 
10:00 PAGE 12-47 


. WORD 


SEQ 0069 


L10006-2-. 
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CVCLHB.P11 15=JUN-81 15:48 GLOBAL SUBROUTINES SECTION 

5551 .SBTTL GLOBAL SUBROUTINES SECTION 

5552 

5553 p++ 

5554 : THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 

5555 : THAT ARE USED IN MORE THAN ONE TEST. 

5556 ;* 

5557 

5634 

5635 .SBTTL CLOCK SETUP SUBROUTINE 

5636 

5637 ; 

5638 : "FUNCTIONAL DESCRIPTION: 

5639 ; THIS SUBROUTINE SETS UP THE CLOCK INFORMATION TABLE FOLLOWING A ‘‘CLOCK*' 

5640 ; CALL EXECUTED IN THE INITIALIZATION CODE. BUT SINCE THE ‘‘CLOCK*’ CALL 

5641 : SAYS NOTHING ABOUT AN LSI-11'S CLOCK, THIS ROUTINE IS ONLY USED IF A 

5642 ; LINE OR P=CLOCK IS FOUND. 

5643 ; 

5644 ; INPUTS: 

5645 : R1= POINTS TO SUPERVISOR SPACE WHERE CLOCK INFO WAS RETURNED 

2ee6 : R2= POINTS TO ‘‘CLK'’ TABLE WHERE CLOCK INFO WILL BE KEPT 

5648 : IMPLICIT INPUTS 

raed : THE SUPERVISOR SPACE WHERE CLOCK INFO WAS RETURNED BY THE ‘‘CLOCK‘' CALL 

5651 > QUTPUTS: 

5652 ; "CLKCSR'* GETS LOADED WITH THE CLOCK'S CSR ADDRESS 

5653 : "CL " GETS LOADED WITH THE CLOCK'S INTERRUPT LEVEL 

5654 : "CLKVEC'' GETS LOADED WITH THE CLOCK'S INTERRUPT VECTOR 

5655 : "'CLKHZ'' GETS LOADED WITH THE LINE FREQ. (HERTZ RATE) WHICH DETERMINES 

2638 3 THE NUMBER OF TICKS IN A SECOND 

5658 3 CALLING. SEQUENCE: 

$44 5 PC, CLKSET sCALL CLOCK SETUP WITH R1 & R2 SETUP 

5661 

5662 017422 CLKSET: 

5663 017422 012122 MOV (R1)+,(R2)+ LOAD CLOCK" : CSR ADDR. INTO "‘CLKCSR*’ 
017424 012112 MOV (R1)+, (R2) LOAD CLOCK'S INT. LEVEL INTO ‘'CLKBR’’ 

5665 017426 312 ASL (R2) SADJUST THE INT. LEVEL FOR LOADING INTO 

5666 017430 312 ASL (R2) : THE PSW WITH A ''SETVEC’’ CALL 

5667 017432 312 ASL (R2) 

5 017434 006312 ASL (R2) 

5669 017436 322 ASL (R2)+ 

5670 017440 012122 MOV (R1)+,(R2)+ sLOAD CLOCK'S INT. VECTOR INTO “‘CLKVEC'' 

5671 017442 012122 


MOV (R1)+,(R2)+ LOAD CLOCK'S HERTZ RATE INTO "‘CLKH2** 
5672 017444 000207 RTS PC 





---—-—_--————_ ee ee 
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CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052)_ 16=JUN-81 10:00 PAGE 12-49 SEQ 0071 


| 
-CVCLHB.P11—-15=JUN-81 15:48 CLOCK SETUP SUBROUTINE 
| §675 
| 3676 »SBTTL CLOCK INTERRUPT SERVICE ROUTINE 
| $678 : "FUNCTIONAL DESCRIPTION: 
| 5679 : HIS IS THE CLOCK INTERRUPT SERVICE ROUTINE WHICH TAKES CARE OF 
5680 : KEEPING THE “TIME-SINCE-STAR D COUNTING DOWN ANY OF THE 
5681 : "EVENT’’ TIMERS. THE TIMERS ARE USED TO TIME COMPLETION OF DEVICE 
5682 : REQUESTS. THE ‘'TIME-SINCE-START’’ IS USED TO BE LOGGED WITH EACH ENTRY 
5683 : INTO THE EVENT LOG. 
5684 : 
5685 + IMPLICIT INPUTS: 
5686 : TIMTCK: THE CURRENT NO. OF TICKS LEFT TO BE COUNTED UNTIL A SECOND 
| 5687 : HAS BEEN COUNTED OFF 
5688 : CLKHZ2: THE NO. OF TICKS IN A SECOND, DETERMINED By, THE SYS. LINE FREQ. 
5689 : TIMMIN & TIMSEC: CURRENT VALUE OF ‘'TIME-SINCE-STAR 
5690 : IN MINUTES & SECONDS 
3691 : TIMER 1,2, & S: CURRENT VALUES OF THE ‘EVENT TIMERS'' 
5693 : IMPLICIT OUTPUTS: 
5694 : NEW VALUE OF EVENT TIMER 'l'' DECREMENTED BY 1 TICK IF IT WAS NON-ZERO 
5695 : NEW VALUE OF EVENT TIMER ‘'2’ DECREMENTED BY 1 TICK IF IT WAS NON-ZERO 
3696 : NEW VALUE OF EVENT TIMER ‘'S'’ DECREMENTED BY 1 SECOND IF IT WAS NON-ZERO 
5698 + FUNCTIONAL SIDE EFFECTS: 
5699 : THE CLOCK IS DISABLED UPON ENTRY AND REENABLED WHEN LEAVING 
5701 : CALL ING SEQUENCE : 
5702 : THIS ROUTINE IS CALLED WHEN THE CLOCK INTERRUPTS THRU ‘'CLKVEC'*. 
5703 ; THE ADDRESS OF THIS ROUTINE WAS LOADED INTO THE CLOCK'S INTERRUPT 
a ; VECTOR WITH A SUPERVISOR ‘'SETVEC’’ CALL. 
5706 
5707 017446 BGNSRV CLKINT 
$3 017446 CLKINT:: 
5709 017446 005077 167142 CLR @CLKCSR :DISABLE THE CLOCK FORM INTERRUPTING 
5710 017452 005337 006632 DEC TIMTCK “DECREMENT THE # OF TICKS/SEC. 
5711 017456 001015 BNE 1$ GO CHECK TIMERS (1&2-TICKS, 3-SECONDS) 
5712 017460 013737 006622 006632 MOV CLKHZ,.TIMTCK  :RESET THE # OF TICKS/ SEC. 
5713 017466 005237 006630 ' INC TIMSEC ZINC # OF SECS~SINCE~STAR 
5714 017472 022737 000074 006630 CMP #60. , TIMSEC [SEE IF WE'VE COUNTED 60 SECS. YET 
5715 017500 001004 BNE 1$ ‘IF NOT, GO CHECK TIMERS 
5716 017502 005237 006626 INC TIMMIN * ELSE INC MINUTES-SINCE-START 
5717 017506 005037 006630 CLR TIMSEC : AND RESTART SECOND COUNTER 
5719 017512 005737 006634 1$: TST TIMER} :SEE IF TIMER #1, TIMING ANYTHING 
5720 017516 001402 BEQ 2$ : IF=0, NOTHING BEING TIMED CHECK NEXT TIMER 
5721 017520 005337 006634 DEC TIMER1 + ELSE DECREMENT THE TIMER VALUE (BY 1 TICK) 
5722 017524 005737 006636 2$: TST TIMER2 [SEE IF TIMER #2, TIMING ANYTHING 
5723 017530 001402 BEQ 3$ ; IF=0, NOTHING BEING TIMED CHECK NEXT TIMER 
5724 017532 005337 006636 DEC TIMER2 * ELSE DECREMENT THE TIMER VALUE (BY 1 TICK) 
5725 017536 005737 006640 3$: TST TIMERS [SEE IF TIMER #3, TIMING ANYTHING 
5726 017542 001406 BEQ 4$ : IF=0, NO HING BEING TIMED, LEAVE 
5727 017544 023737 006622 006632 CMP CLKHZ,TIMTCK | :SEE IF A SECOND HAS BEEN COUNTED OFF 
5728 017552 001002 E 4$ : IF 


BN NO 
017554 005337 006640 DEC TIMERS DECREMENT THE TIMER VALUE (BY 1 SEC.) 





H 6 , 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-50 SEQ 0072 
CVCLHB.P11 15=JUN-81 15:48 CLOCK INTERRUPT SERVICE ROUTINE ' 
5730 017560 013777 006624 167026 4$: MOV CLKEN,@CLKCSR  ;REENABLE THE CLOCK TO INTERRUPT 
2534 017566 ENDSRV 
(3) 017566 10007: se: 


(2) 017566 000002 





soon ee re ———— ee 


CVCLHB DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) aa 5 a 1 ~—" PAGE 12-51 SEQ 0073 


| CVCLHB.P11 15=JUN-81 15:48 EVENT LOG SUBROUT! 
| 5733 .SBTTL EVENT LOG SUBROUTINES 
| 5734 
| §735 p++ 
| 5736 : FUNCTIONAL DESCRIPTION: 
| §737 ; THIS SUBROUTINE HAS A DIFFERENT ENTRY POINT 
| 5738 ; FOR EACH EVENT TO BE LOGGED AND ALWAYS PRINTS 
| §739 ; THE SHORT ‘OPERATOR AWAKE'’ MESSAGE TO CONSOLE THEN LOGS THE 
| §740 : EVENT TYPE, TIME, AND THE OTHER 3 WORDS OF INFO PASSED TO THE 
eet ; SUBROUTINE AT CALLING TIME 
5743 : INPUTS: 
5744 : TIMMIN & TIMSEC: CURRENT VALUE OF ‘‘TIME-SINCE=START'’ 
5745 : TEMP2: WORD #1 OF EVENT LOG INFORMATION (FOR MOST EVENT TYPES) 
5746 : TEMP3: WORD #2 OF EVENT LOG INFORMATION 
5747 : TEMP4: WORD #3 OF EVENT LOG INFORMATION 
5748 : MODS: CURRENT VALUE OF THE MODEM SIGNALS AVAILABLE FROM THE DEVICE 
5750 ; OUTPUTS 
5751 : OPERATOR AWAKE" MESSAGE SENT TO THE CONSOLE 
5752 ; NEW EVENT LOGGED IN ‘EVTLOG'' (EVENT LOG) 
ed, 3 UPDATED "‘EVTPTR'' (EVENT LOG ENTRY POINTER) 
5755 ; SUBORDINATE ROUTINES USED: 
5756 : “DVMODS'’ THE DEVICE SUBROUTINE THAT RETURNS MODEM STATUS IN ‘MODS’ 
9797 : (FOR SOME EVENT TYPES) 
5759 > FUNCTIONAL SIDE EFFECTS: 
5760 : TEMP: USED TO STORE ADDRESS OF ‘OPERATOR AWAKE’’ MESSAGE 
4 § TEMP1: USED TO SETUP THE VALUE OF THE ‘EVENT TYPE" arte FOR LOGGING 
5763 : CALLING | SEQUENCE : 
5764 : PC ,LOGTXQ :CALL THE LOG EVENT SUBROUTINE WITH TEMP, TEMP1, 
3765 : . ittten : TEMP2, TEMP3, AND TEMP4 SETUP 
5767 ; JSR PC,LOGCMP 
5768 :< 
5769 
5770 017570 LOGTXQ: 
5771 017570 012737 016231 006532 MOV #STXQ, TEMP1 :SET UP MSG. TO PRINT 
5772 017576 012737 000000 006530 MOV #TXQ, TEMP :SET UP EVENT TYPE 
5773 017604 000517 BR LOGS1 *GO LOG EVENT AND TIME 
5775 017606 LOGTXC: 
5776 017606 012737 016242 006532 MOV #STXC,TEMP1 :SET UP MSG. TO PRINT 
5777 017614 012737 000002 006530 MOV #TXC, TEMP [SET UP EVENT TYPE 
5778 017622 000510 BR LOGS1 *GO LOG EVENT AND TIME 
5780 017624 LOGRXQ: 
5781 017624 012737 016253 006532 MOV #SRXQ, TEMP1 :SET UP MSG. TO PRINT 
5782 017632 012737 000004 006530 MOV #RXQ, TEMP [SET UP EVENT TYPE 
5783 017640 000501 BR LOGS1 *GO LOG EVENT AND TIME 
5785 017642 LOGRXC: 
5786 017642 012737 000006 006530 MOV #RXC, TEMP :SET UP EVENT TYPE 
5787 017650 000475 BR LOGSi *GO LOG EVENT AND TIME 


5788 017652 LGDVE: 





CVCLHB DPV-11 DATA COMM, LINK 
CVCLHB.P11 


017652 
017660 
017666 
017670 


020064 


020126 


15=JUN-81 


012737 
012737 
000451 
012737 
012737 
000442 
012737 
012737 
000433 
012737 


012737 
000424 


012737 
012737 
000415 


013746 
004 


022737 

001434 

032737 

001430 
s 


022737 


15:48 
016264 
000010 


016275 
000014 
016317 
000020 
016330 
000022 


016341 
000024 


016352 
000016 


006502 
033502 
006502 
020300 
007550 


000006 
000001 


006474 


006532 
006530 


006532 
006530 


006532 
006530 


006532 
006530 


006540 


006530 
006570 


006474 


MACY11 30A(1052) 
EVENT LOG SUBROUTINES 


LOGDVI: 


LOGCMP: 


LOGCML : 


LOGCMD: 


LOGEOP: 


LOGMSC: 


LOGS1: 


1$: 
LOGS3: 


16-JUN-81" 


#SDVE, TEMP1 
#DER, TEMP 
LOGS3 


#SDVI,TEMP1 
#DVI,TEMP 
MODTYP, TEMP2 


MLTYP, TEMP2+1 


RPASS , TEMPS 
PARAM, TEMP4 
LOGS3 


#SCM, TEMP1 
#DCK. TEMP 
LOGS3 
#SCML, TEMP1 
#DLE, TEMP 
LOGS3 
#SCMD, TEMP1 

DE, TEMP 
LOGS3 
#SEOP, TEMP1 
#EOP 


TEMP 
LOGS3 


#SMSC, TEMP1 

#MSC, TEMP 

LOGS3 

ERRCNT,-(SP) 
C,DVMODS 
(SP) +,R4 

R4,ERRCNT 

1$ 

LOGEX 


MODS , TEMP4 
#RXC, TEMP 


LOGS 
#STATB,PARAM 
LOGSS 


#10,LNCNT 
LOGS4 
LNCNT 


6 
10:00 PAGE 12-52 SEQ 0074 


SET UP MSG. TO PRINT 
SET UP EVENT TYPE 
;GO LOG EVENT AND TIME 


SET UP MSG. TO PRINT 
SET UP EVENT TYPE 


;SET UP EVNT ENTRIES 
;GO LOG EVENT AND TIME 


;SET UP MSG. TO PRINT 
SET UP EVENT TYPE 


;SET UP MSG. AND TYPE 
3GO LOG EVENT AND TIME 


3:60 LOG MSG TYPE AND TIME 


;GO LOG MSG TYPE AND TIME 


; SAVE CURRENT ERROR COUNT 
GET MODEM STATUS 
a SAVED ERRCNT VALUE 
WHERE ANY ERRORS FOUND 


: BR IF NONE 

; ELSE, LEAVE WITHOUT LOGGING ANYTHING 
BUT THE DEVICE ERROR FROM *DVMODS' 

AND PUT IT IN TEMP4 


z1F RXC DONT PRINT 
IF NO STATUS SELECTED 
GO TO 5 


;HAVE WE DONE 10? 


;1F NOT GO TO 4 
sESLE CLEAR IT 


CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 yk yy 16-JON=B1" 18: 00 PAGE 12-53 SEQ 0075 


CVCLHB.P11 15=JUN=81 15:48 T LOG SUBROUTINES 

5858 

5859 020132 PRINTF #CR ELSE PRINT CR 
(7) 020132 012746 016226 MOV A#CR,~(SP) 
(6) 020136 012746 000001 MOV #1,-(SP) 
(3) 020142 010600 MOV SP,RO 
(4) 020144 104417 TRAP CSPNTF 
(4) 020146 062706 000004 ADD #4 ,SP 

5860 020152 LOGS4: 

5861 020152 005237 006474 INC LNCNT INC COUNTER OF # OF AWAKE MSGS 

5862 020156 PRINTF TEMP1 PRINT OPERATOR AWAKE MSG. 
(7) 020156 013746 006532 MOV TEMP1 ,=(SP) 
(6) 020162 012746 000001 MOV #1,~-(SP) 
(3) 020166 010600 MOV SP,RO 
(4) 020170 104417 TRAP CSPNTF 
(4) 020172 062706 000004 ADD #4 ,SP 
5863 176 010346 LOGS5: MOV R3,-(SP) SAVE R3 ON THE STACK 

5864 020200 013703 006642 MOV EVTPTR,R3 

5865 020204 113723 006530 MOVB TEMP, (R3)+ :LOG EVENT 

5866 020210 013737 006622 006530 MOV CLKHZ, TEMP 

5867 020216 163737 006632 006530 SUB TIMTCK, TEMP 

5 020224 113723 006530 MOVB TEMP, (R3)+ ;LOG TIME SINCE START 

5869 020230 113723 006630 MOVB TIMSEC, (R3)+ . 

5870 020234 113723 006626 MOVB TIMMIN, (R3)+ zTICKS,SECS AND MINS. 

5871 020240 013723 006534 MOV TEMP2, (R3)+ LOG EVNT ENTRY 3 

5872 020244 013723 006536 MOV TEMPS, (R3)+ ;LOG EVNT ENTRY 4 

5873 020250 013723 006540 MOV TEMPS, (R3)+ LOG EVNT ENTRY 5 

5874 020254 020327 007546 CMP R3,A#EVTEND 

5875 020260 103404 BLO LOGS2 :1F EVENT LOG FULL GO 

5876 CONTINUE;ELSE GO TO 2 

5877 020262 012713 177777 MOV #-1,(R3) ;LOG A_TABLE END 

5878 020266 012703 006644 MOV #EVTLOG,R3 ;PUT R3_ TO START OF TABLE 

5879 020272 010337 006642 LOGS2: MOV R3,EVTPTR sRESTORE * a ER 


5880 020276 012603 MOV (SP)+,R3 RESTORE R 
20300 000207 PC 








6 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 neta g 14 16=JUN-81 10:00 PAGE 12-54 SEQ 0076 
CVCLHB.P11 15=JUN=81 15:48 REPORT EVENT LOG 


5884 .SBTTL REPORT Event LOG 

5885 ;REV B BY EC 

5886 be FOLLOWING we ADDED TO REVISION B CVCLHB 

5887 DPV DCLT PROGRAM 

5888 tIRPT> L LOG 

5889 ii HELP 

5890 EXIT 

5891 italy SOME FUTURE DATE AFTER DDCMP PROTOCOL IS SUPPORTED BY THIS 

ras PROGRAM, ERROR REPORTING CAN BE ADDED HERE. 

5894 020302 010246 REPORT: MOV R2,-(SP) ;SAVE R2,R3,R4 ON THE STACK 

5895 020304 010346 MOV R3,-(SP) 

rd 020306 010446 MOV R4,-(SP) 

5898 ;PRINT HELP MESSAGE 

020310 PRINTF #RHLPO ;BASIC HELP MESSAGE 

(7) 020310 012746 013034 MOV #RHLPO,-(SP) 
(6) 020314 012746 000001 MOV #1, =(SP) 
(3) 020320 010600 MOV SP, “RO 
(4) 020322 104417 TRAP CSPNTF 
5 bd 020324 062706 000004 ADD #4 ,SP 

5901 020330 105037 003143 GETRCL: CLRB P$GDAD ; INIT GOOD/BAD FLAG =-1=BAD INPUT 

ra 020334 105037 003142 CLRB PSNNUF INIT MORE COMMAND LINE INPUT NEEDED 

5904 ;PRINT PROMPT ‘RPT>' 

5905 020340 GMANID CLISRP,CMDBUF,A,0,1,72.,NO 

(3) 020340 104443 TRAP CSGMAN 
(3) 020342 000406 BR 10000$ 
(4) 020344 002666 -WORD  CMDBUF 
(5) 020346 000142 -WORD TSCODE 
(5) 020350 011546 «WORD CLISRP 
(5) 020352 000000 -WORD O 
(5) 020354 000001 -WORD TSLOLIM 
(5) 020356 000110 «WORD TSHILIM 
(3) 020360 10000$: 

5906 020360 012737 002666 003126 MOV #CMDBUF , PSBUFA ¢ INPUT BUF FER 

5907 020366 012737 020522 003130 MOV #CLIRT, PSTREE REPORT CLI TREE 

5908 020374 012737 020610 003132 MOV #cLIRAC, PSACT S ACTION ROUTINES 

5909 020402 005037 003012 CLR QUALFG 

5910 020406 004737 023066 JSR PC, PSTRV ;GO PARSE COMMAND LINE 

5911 020412 105737 003143 TSTB P$GDBD ; COMMAND OK ? 

5912 020416 001412 BEQ 1$ 7 YES, BRANCH 

5913 020420 PRINTF #CLIERM ;PRINT INVALID INPUT MESSAGE 
(7) 020420 012746 011553 MOV #CLIERM,-(SP) 
(6) 020424 012746 000001 MOV #1,-(SP) 
(3) 020430 010600 MOV SP,RO 
(4) 020432 104417 TRAP CSPNTF 
(4) 020434 062706 000004 ADD #4 SP 
ray 020440 000137 020330 JMP GETRCL ;TRY AGAIN 

5916 020444 105737 003142 1$: TSTB PSNNUF ;MORE COMMAND NEEDED ? 

5917 020450 001412 BEO 10$ 7NO,BRANCH 

5918 020452 PRINTF #CLINUF > INCOMPLETE ME SSAGE 
(7) 020452 012746 011603 MOV oCL IA -(SP) 


(6) 020456 012746 000001 MOV #1 ,-(SPS 



















CVCLHB.P11 


010600 
104417 
062706 
000137 


023727 


CVCLHB DPV-11 DATA COMM, LINK TEST 
15=JUN=81 15:48 


000004 
020330 
003010 000002 
020330 


10$: 


20S: 


GETRCL 
KEYWD1 ,#RPEXT 
20$ 


GETRCL 

(SP)+,R4 
(SP)+,R3 
(SP)+,R2 
PC 


MACY11 Brent ibe 16=JUN=81 " 8. 700 PAGE 12-55 
REPORT EVENT LOG 


TRAP 
ADD #4 ,SP 


MOV SP ,RO 
CSPNTF 


TRY AGAIN 


;EXIT COMMAND ? 
3; YES,BRANCH 
;GET ANOTHER COMMAND 


TRE STORE R2 
; RETURN 


SEQ 0077 





CVCLHB DPV-11 DATA COMM, u~ TEST 


CVCLHB.P11 15=JUN=81 15:4 
5929 . SBTTL 
5930 02052 CLIRT 
5931 020526 R10$: 
5932 020532 
5933 0205 R11$: 
5934 020550 
5935 020552 R12$: 
5936 0205 
5937 020570 R13$: 
5938 020602 
5939 020604 - 30$: 
5940 020606 R125$ 


MACY11 30A(1052) 16=JUN-81 "48. :00 PAGE 12-56 
COMMAND 


SEQ 0078 


LINE PARSING TREE FOR REPORT 


COMMAND Sy Rie TREE FOR REPORT 


CLI CLISPA,O,R SKIP SPACES IN COMMAND LINE 

CLI <*?>,RPHLP,R11$ IF NPUT = ? latoh” PRINT” HELP MESSAGE 
CLI CLIEXI,0 z;AND EXIT PARSER 

CLI CLISTR,RPHLP,R12$,<'HELP'> “HF INPUT = ‘HELP’ poke PRINT HELP 
CLI CLIEXI,0 ‘iF input AND EXIT PARSER 

CLI CLISTR.RPEXT,R13$,<"EXIT'> NPUT = ‘EXIT’ THEN SET KEYWORD = 
CLI CLIEX1,0 : RPEXT AND EXIT PARSER 

CLI CLISTR,RPLOG,R30$,<'LOG'> F INPUT = ‘LOG’ THEN GO PRINT EVENT 
CLI CLIEXI;0 ;L0G AND EXIT PARSER 

CLI CLIERR,O 

CLI CLIEXI,0 
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CVCLHB DPV-11_ DATA COMM. LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-57 SEQ 0079 
CVCLHB.P11 15-JUN-81 15:48 CLI ACTION DISPATCHER AND ROUTINES 

5942 . SBTTL aS, ACTION DISPATCHER AND ROUTINES 

5943 020610 006302 CLIRAC: Re :SET UP INDEX 

5944 020612 016202 020626 mov Hh tg 1 R2 ; 

5945 020616 062702 020626 ADD #10$,R2 : 

5946 020622 004712 JSR PC. (R2) :GO DO ACTION 

5947 020624 000207 RTS PC RETURN 

5948 020626 000010 10$: -WORD ACTRNL-10$ 3NULL 

5949 020630 000012 ; -WORD ACTRHL~-10$ ;HELP ROUTINE 

5950 020632 000056 -WORD ACTREX-10$ ZEXIT ROUTINE 

rae 020634 000066 -WORD ACTRLG-10$ ;REPORT EVENT LOG ROUTINE 

5953 a Py a FOR REPORT; ;;;; 

ooee 020636 000207 ACTRNL: RTS :NULL 

5956 ;PRINT HELP MESSAGE 

5957 020640 012702 003036 ACTRHL: MOV #RHLPTB ,R2 z INDEX FOR HELP MESSAGES 

5958 020644 1$: “PRINTF #HLPF,(R2)+ sPRINT IT 
(8) 020644 012246 MOV (R2)+,-(SP) 
(7) 020646 012746 012241 MOV MHLPF ,-(SP) 
(6) 020652 012746 000002 MOV #2,-(SP) 
(3) 020656 010600 MOV SP RO 
(4) 02 104417 TRAP CSPNTF 
(4) 020662 062706 000006 ADD #6,SP 

5959 020666 020227 003046 CMP R2,ARHLPEN 3LAST a ? 

5960 020672 001364 BNE 1 NO, BRANCH 

5961 020674 012737 000001 003010 MOV #RPHLP.KEYWD1 SET KEYWORD 

ran 020702 000207 RT PC [RETURN 

5964 EXIT REPORT LEVEL 

5965 020704 012737 000002 003010 ACTREX: MOV MRPEXT,KEYWD1  ;SET KEYWORD AND RETURN 

pce 020712 000207 RTS PC 

5968 PRINT ERROR LOG 

5969 020714 004737 020730 ACTRLG: JSR PC ,REPLOG ;GO PRINT EVENT LOG 

5970 020720 012737 000003 003010 MOV #RPLOG.KEYWD1 ;SET KEYWORD 


020726 000207 RTS PC ;RETURN 


oe 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 thy: 16-JUN-81 10:00 PAGE 12-58 SEQ 0080 
| cvCLhe. Pl) 15-JUN=81 15:48 EVENT LOG 


5976 -SBTTL DUMP EVENT LOG 

5978 

5979 020730 010246 REPLOG: MOV R2,-(SP) SAVE R2,R3,R4 ON THE STACK 

5980 020732 010346 MOV R3,-(SP) 

5981 020734 010446 MOV R4,=(SP) 

5982 

5990 ‘ 

5992 

5993 020736 013702 006642 MOV EVTPTR,R2 MAKE R2 A POINTER TO EVENT TABLE 

5994 020742 023727 006644 177777 CMP EVTLOG, 4-1 ;SEE IF EVENT TABLE IS EMPTY 

5995 020750 001034 BNE RPTO ;BR IF NO 

5996 020752 PRINTS #NULEVT ;1F EMPTY TELL OPRERATOR. 
(7) 020752 012746 015201 MOV #NULEVT ,- (SP) 
(6) 020756 012746 000001 MOV #1,-(SP) 
(3) 020762 010600 MOV SP,RO 
(4) 764 104416 TRAP C$PNTS 
(4) 020766 062706 000004 ADD #4 ,SP 

rasa 020772 000137 021656 JMP ENDEVT :AND END 

5999 020776 162702 000012 RPT: SUB #12,R2 NOW POINT BACK TO TOP OF ENTRY U 

6001 :JUST PRINTED 

6002 021002 020227 006644 CMP R2,MEVTLOG POINTING TO TOP OF EVNT LOG QUEUE? 

6003 021006 001010 BNE RPT1 ; BR IF 

6004 021010 012702 007546 MOV #EVTEND ,R2 7SET R2 TO POINT TO BOTTOM OF LOG 

6005 021014 026227 177776 177777 CMP -2(R2) #1 

6006 021022 001007 BNE RPTO IF END OF LOG IS NOT EMPTY 

6007 021024 000137 021656 JMP ENDEVT CONTINUE...ELSE EXIT 

6009 021030 020237 006642 RPT1: CMP R2,EVTPTR zARE WE BACK TO POINTER? 

6010 021034 001002 BNE RPTO IF NOT CONTINUE 

dp 021036 000137 021656 JMP ENDEVT IF SO EXIT.... 

6013 021042 162702 000012 RPTO: SUB #12,R2 ;POINT R2 TO START OF ENTRY 

6014 021046 RPTAA: PRINTS #EVTFO :PRINT EVENT ENTRY HEADER 
(7) 021046 012746 015241 MOV #EVTFO, — 
(6) 021052 012746 000001 MOV #1,-(SP) 
(3) 021056 010600 ’ MOV SP;RO 
(4) 021060 104416 TRAP CS$PNT 
(4) 021062 062706 000004 ADD #4, SP 

6015 021066 112203 MOVB (R2)+,R3 PUT EVENT TYPE INTO R3 

6016 021070 112237 007640 MOVB (R2)+, EVTTCK 

6017 021074 112237 007634 MOVB (R2)+, pvreee PUT EVENT TIME (TICKS,SECS.MINS IN TEMP LOC.S) 

6018 021100 112237 007636 MOVB (R2)+,EVTMIN 

6019 0S PRINTS #EVTF1,EVTMIN,EVTSEC.EVTTCK,EVTLST(R3) PRINT — - AND DESCRIPT. 


TLST(R3), gw 


MOV MEVTFI, gy 6S) 
MOV #5,-(SP 

MOV SP.RO 

TRAP CSPNTS 

ADD #14,SP 





CVCLHB DPV-11 DATA COMM. LINK TEST 


CVCLHB.P11 


02 
021312 
021316 


021422 


15=JUN-81 1 
000173 
012237 
012237 
012203 


013746 


012237 
012237 
012237 


013746 


012237 
013746 


15:48 
007650 
007642 
007644 


007644 
007642 
015364 
000003 


000010 
021666 
020776 


022564 
020776 
00764 


RPTTXQ: 


RPTDER: 


RPTDVI: 


RPTEOP: 





MACY11 30A(1052) 
DUMP EVENT 


JMP 
MOV 
MOV 


MOV 
PRINTS 


JSR 
JMP 


MOV 
MOV 


MOV 
PRINTS 


PRINTS 


D 
16=JUN-81 
LOG 


@RPTDSP(R3) 


(R2)+, EVTADD 
(R2)+, EVTBCT : 


(R2)+,R3 
#EVTF 2, EVTADD,EVT 


PC,RPTMSB 
RPT 


(R2)+,EVTTMP 

(R2)+.DEV1 
(R2)+,DEV2 

#EVTF3,EVTTMP 


MEVTF3C,DEV1,DEV2 


RPT 
DEV1 


DEV2 
(R2)+,DEV1 
(R2)+,DEV2 
(Re) +,DEV3 
(R2)+,DEV4 
R2,~(SP) 
PC ,SHWOP 
(SP)+,R2 
RPT 


(R2)+, EVTADD 
(R2)+,EVTBCT 
(R2)+ 


MO e-EVTTMP 
PRINTS MEVTF4SB,EVTADD,EVIBCT EVI TMP 


7 
10:00 PAGE 12-59 


SEQ 0081 


DISPATCH TO DECODING SECTION FOR SPECIFIC TYPE 


STORE MESSAGE ADDRESS Paint — 


; STORE 
BCT PRINT ADDR,BYTE CNT 


MOV EVTBCT,-(SP) 
MOV EVTADD ,=(SP) 
MOV MEVTF2,-(SP) 
MOV #3,-(SP) 

MOV SP,RO 

TRAP CSPNTS 

ADD #10,SP 


3GO PRINT MODEM STATU 
;GO BACK FOR NEXT EVENT ENTRY 


GET ADDRESS OF DEVICE INFO MESSAGE 
STORE DEVICE REG CONTENTS FOR PRINTING 


PRINT DEVICE REG CONTENTS. 


MOV EVTTMP,-(SP) 


MOV MEVTF3,-(SP) 
MOV #2,-(SP) 
MOV SP,RO 

TRAP C$PNTS 

ADD #6,SP 

MOV DEV2,-(SP) 
MOV DEV1,-(SP) 
MOV MEVTF3C,-(SP) 
MOV #3,-(S 

MOV SP RO 

TRAP CSPNTS 

ADD #10,SP 


:GO BACK FOR NEXT EVENT ENTRY 


CLEAR UPPER BYTES OF DEV1 & DEV2 BEFORE USE 
:STORE SETUP OPERATION PARAMETERS FOR PRINTING 


SAVE R2 ON THE STACK 

3GO PRINT MODE, MAINT-LOOP TYPE, PARAMTERS. 
;RESTORE R2 

:GO BACK FOR NEXT EVENT ENTRY 


PRINT ADDR, RXBYTES,CMPBYTES. 
MOV EVTTMP,-(SP) 


2 
| CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-60 SEQ 0082 
CVCLHB.P11 15=JUN-81 15:48 DUMP EVENT LOG 
| 
(4) 021424 104416 TRAP —- C$PNTS 
oft) 021426 062706 000012 ADD #12,SP 
6091 021432 000137 020776 JMP RPT : THEN GO GET NEXT EVENT ENTRY 
6053 
6054 021436 012237 007642 RPTDDE: MOV (R2)+,EVTADD § ;STORE MESSAGE ADDRESS FOR PRINTING 
6055 021442 012237 007644 MOV (R2)+,EVTBCT | STORE BYTE COUNT FOR PRINTING 
6056 021446 012237 007646 MOV (R2)+.EVTTMP | :STORE TOTAL # OF CMP ERRORS 
6057 021452 PRINTS #EVTF4,EVTADD,EVIBCT,EVT TMP :PRINT ADDR, BYTE | CNT, # CMP ERRS 
(10) 021452 013746 007646 EVTTMP, -(SP) 
(9) 021456 013746 007644 mov EVTBCT.=(SP) 
(8) 021462 013746 007642 MOV EVTADD.-(SP) 
(7) 021466 012746 015507 MOV WEVTF4,-(SP) 
(6) 021472 012746 000004 MOV #4 ,-(SP) 
(3) 021476 010600 MOV SP,RO 
(4) 021500 104416 TRAP — C$PNTS 
(4) 021502 062706 000012 ADD #12,SP 
6058 021506 000137 020776 JMP RPT : THEN GO GET NEXT EVENT ENTRY 
6060 021512 RPTDLE: 
6061 021512 012237 007642 RPTDCK: MOV (R2)+,EVTADD ; STORE MSG ADDR FOR PRINT 
6062 021516 012237 007644 MOV (R2)+. EVTBCT ‘STORE BYTE COUNT 
6063 021522 012237 007646 MOV (R2)+.EVTTMP = STORE BYTE COUNT COMP 
6064 021526 PRINTS weVTRLAY EVTADD.EVIBCT,EVTTMP =; PRINT ADDR, RXBYTES, CMPBYTES. 
(10) 021526 013746 007646 MOV EVTTMP,-(SP) 
(9) 021532 013746 007644 MOV EVTBCT.-(SP) 
(8) 021536 013746 007642 MOV EVTADD,-(SP) 
(7) 021542 012746 015611 MOV WEVTF4A,~(SP) 
(6) 021546 012746 MOV #4,-(S 
(3) 021552 010600 MOV ’ 
(4) 021554 104416 TRAP  C$PNTS 
“ft 021556 062706 000012 ADD #12,SP 
6066 021562 000137 020776 JMP RPT : THEN GO GET NEXT EVENT ENTRY 
6068 
6069 
6080 
6081 
6082 021566 012237 007646 RPTMSC: MOV (R2)+, EVTTMP 
6083 021572 PRINTS #EVIF3,EVTTMP  ;:PRINT CHANGE TYPE 
(8) 021572 013746 007646 MOV EVTTMP,-(SP) 
015436 MOV MEVTF3,-(SP) 
000002 MOV #2,-(SP) 
| MOV SP.RO 
TRAP  C$PNTS 
000006 ADD #6,SP 
MOV (R2)+,R3 :PUT OLD MODEM STATUS IN R3 FOR PRINTING 
021666 JSR PC .RPTMSB [GO PRINT OLD MODEM STATUS 
PRINTS #EVMOCG *GO PRINT ‘CHANGED TO:' 
016051 MOV #EVMOCG. -(SP) 
000001 MOV #1,-(SP) 
MOV SP-RO 
TRAP  C$PNTS 


000004 ADD #4 ,SP 
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CVCLHB DPV=-11 DATA COMM, “ry TEST 


CVCLHB.P11 
6087 021644 
021646 
6089 021652 


6092 021656 
6093 021660 


6117 021776 


15=JUN-81 
pests 


004737 
000137 


012746 
012746 
00 


012746 
0600 


iS: 


021666 
020776 


016074 
000001 


000004 
007552 
007570 


000130 


000061 


000060 
007570 


016154 
000001 


000004 


MACY11 30A(1052) 
DUMP EVENT 


RPTMSE : 


ENDEVT: 


REPORT 


RPTMSB: 


6$: 


7$: 


8$: 
9$: 





(R2)+,R3 
PC ,RPTMSB 
RPT 


(SP) +,R4G 
(SP)+,R3 
(SP)+,R2 
PC 


F 
16=JUN-81 
LOG 


7 
10:00 PAGE 12-61 SEQ 0083 


;PUT NEW MODEM STATUS Aw > FOR PRINTING 
;GO PRINT NEW MODEM STA 
; THEN GO GET NEXT EVENT 


;RESTORE R4,R3,R2 


;RETURN TO CALLING ROUTINE 


MODEM STATUS SUBROUTINE 
PART Ot STATISICAL REPORTING (DUMPING EVENT LOG) 


PRINTS 


PRINTS 


RTS 


#E VMOHD 


A#MOBITS ,.R4 
#MOMSGS ,R5 
(R4) 

7$ 
#*X,a(R5)+ 
(R4)+ 

9$ 
(R4)+,R3 
8$ 
#'1,a(R5)+ 
9$ 


#'0,a(R5)+ 
sores 


6 
#EVMOST 


PC 


;PRINT MODEM STATUS HEADER 
MOV 


ME VMOHD , = (SP) 
MOV #1,-(SP) 
MOV SP,RO 


ng neo 

:MAKE R4 A POINTER TO MODEM SIG. BIT DEF. TABLE 

MAKE R5 A POINTER TO MODEM MSG. POSITION TABLE 
ZSEE IF BIT AVAIABLE FROM DEVICE 
:BR IF THAT MODEM SIG. AVAIABLE 
SELSE PUT 'X'' IN REPORT IF SIGNAL NOT AVAILABLE 
;BUMP_R4 TO POINT TO NEXT BIT sy ny ce 
7GO SEE IF CHECKED ALL MODEM SIGNALS 
71F THERE, SEE IF THAT BIT IN DEVICE'S ENTRY=1 


ME SSAGE 
:60° "See IF ALL ~ Te CHECKED 
71F BIT(SIGNAL)=0, PUT ‘0°’ IN REPORT MESSAGE 
7SEE IF ALL BITS (SIGNALS) CHECKED 
[LOOP UNTIL ALL SIGNALS(BITS) CHECKED 
[THEN PRINT MODEM SIGNAL VALUE MESSAGE 
MOV #EVMOST ,-(SP) 


MOV #1 ,-(SP) 


MOV SPR 
TRAP CSPNTS 
ADD #4 ,SP 


RETURN TO EVENT DECODING 


g 6 7 
| CVCLHB DPV=11 DATA COMM, LINK TEST MACYT1 30A(1052)_16-JUN-81" 10:00 PAGE 12-62 SEQ 0084 
| CVCLHBLP11.15-JUN-81 15:48 BYTES OR WORD 


6121 . SBTTL DUMP BYTES OR WORDS 


; "FUNCTIONAL DESCRIPTION: 
; DUMPSR = DUMP BYTES OR WORDS SUBROUTINE 


= 
mM 
oO 


| THIS SUBROUTINE PRINTS THE CONTENTS OF THE LOCATIONS BETWEEN 
6129 ; A STARTING AND END ADDRESS IN LOCS. ‘‘STADD'’ AND ‘‘ENADD"’. 
6130 j THE WORD OR BYTE CONTENTS ARE PRINTED 8 TO A LINE WITH THE 
6131 : ADDRESS OF THE FIRST BYTE AS THE FIRST 6 OCTAL CHARS. FOLLOWED 
6132 ; BY A SEMICOLON. 


; INPUTS: 
3 STADD= STARTING ADDRESS (FIRST LOC. TO PRINT) 
: ENADD= END ADDRESS (LAST LOCATION TO DUMP) 
: BYTBIT= 1 IF SUPPOSED TO PRINT ‘BYTES'' 

6138 : 0 IF SUPPOSED TO PRINT ‘WORDS'' 


; OUTPUTS: 
; CONTENTS OF A RANGE OF LOC.S PRINTED ON THE OPERATORS CONSOLE. 


; senate ap grey © 
; PC ,DUMPSR ;CALL DUMP BYTES SUBROUTINE 


6146 — 


6148 022000 013702 006504 DUMPSR: MOV STADD,R2 SET R2 UP TO STARTING ADDR. 
6149 022004 005003 DUM4: CLR R3 CLEAR R3 
6150 022006 PRINTF #BASM1,R2 PRINT ADDRESS 
(8) 022006 010246 MOV R2,-(SP) 
(7) 022010 012746 015173 MOV #BASM1 ,-(SP) 
(6) 022014 012746 000002 MOV #2,-(SP) 
(3) 022020 010600 MOV ta. B 


(4) 022024 062706 000006 ADD #6,SP 
6151 022030 005737 006510 DUM3: TST BYTBIT :1S THIS BYTE OR WORD 
6152 022034 001416 BEQ ‘BR IF WORD 
6153 022036 112237 006530 MOVB ie TEMP ‘MOV BYTE TO TEMP 
6154 022042 PRINTF #BASM3,<B,TEMP> :PRINT BYTE 


02 006530 
(7) 022050 012746 015155 MOV #BASM3 ,~ (SP) 
022054 000002 


(4) 022064 062706 000006 . ADD #6,SP 


BR DUM2 

6156 022072 DUM1: PRINTF #BASM2,(R2)+  ;PRINT WORD 
(8) 022072 012246 . MOV (R2)+,=(SP) 
(7) 022074 012746 015164 . MOV #BASM2 ,~ (SP) 
(6) 022100 012746 000002 MOV #2 ,-(SP) 
(3) 022104 010600 MOV SP RO. 


21 
(4) 022110 062706 000006 ADD #6.SP 
14 020237 006506 DUM2: CMP Re, ENADD ; COMPARE FOR LAST ADD 





H 7 i 
/ CVCLHB DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 16=JUN=81 10:00 PAGE 12-63 SEQ 0085 
| CVCLHG. P11 1§=JUN-81 15:48 DUMP BYTES OR WORDS 


6158 022120 003005 BGT DUME X :1F DONE EXIT 

6159 022122 005203 INC R3 ELSE BUMP R3 

6160 022124 022703 000010 CMP #8. ,R3 HAVE WE forty 8 ACCROSS 

6161 022130 001725 BEQ DUM4 :1F SO GO BACK TO 4 

6162 022132 000736 BR DUM3 SELSE GO BACK AND PRINT ANOTHER 
6163 SBYTE OR WORD 

6164 022134 000207 DUMEX: RTS. PC SRETUR' TO CALLER 





CVCLHB DPV=-11 DATA COMM, LINK TEST 


CVCLHB.P11 


| 

| 
6175 
6176 
6177 
6178 
6179 
6180 


6190 022136 
6191 022144 
6192 022152 


6196. 022154 


620 
6202 022232 
62 


15-JUN-81 


063737 
022737 
103027 


012746 
TE Lips 
10600 


15:48 


006514 
001000 


014126 
000001 


006524 
006524 


MACY11 30A(1052) 


- SBTTL 


OUTPUT 


ADDCC: 


ADDC1: 


me 
16=JUN-81 10:00 PAGE 12-64 


UPDATE TOTAL CHAR. COUNT SUBROUTINE 


INPUTS: 


Ss 


FUNCT JONAL ne Sasi 
CALLING SEQUENCE: 
JSR 


UPDATE TOTAL CHAR. COUNT SUBROUTINE 


+ 
FUNCTIONAL DESCRIPTION: 


UPDATES TOTAL CHAR. COUNT TOTCC BASED ON CURCC. 

LAST MESSAGE IS TRUNCATED TO FIT INTO THE 

BUFFER IF TOTAL CHAR. COUNT EXCEEDS ‘BUFLIM'’ A MESSAGE 
1S PRINTED TELLING THE OPERATOR THE TRUNCATION OCCURED. 


= CHAR. COUNT OF MESSAGE BEING ADDED 
= TOTAL CHAR COUNT OF BUFFER ITS BEING ADDED TO 


MESSAGE TO OPERATOR IF MESSAGE TRUNCATED TO FIT 


TION "'TEMP*’ USED FOR CALCULATIONS 


PC ,ADCC ;UPDATED TOTAL CHAR. COUNT 

ADD CURCC, TOTCC ;ADD CURRENT TO TOTAL 

CMP WBUFLIM,TOTCC ; COMPARE TO ‘BUFLIM'' 

BHIS  ADDC1 ZIF NOT MORE THEN ‘BUFLIM’’ EXIT 

; PRINT MESSAGE AND TRUNCATE COUNT 

PRINTF #MSGTRU 

? MOV 
MOV 
MOV 

. TRAP 

ADD 

SUB CURCC, TOTCC ;SUB CURRENT FROM TOTAL 

MOV #BUFLIM,TEMP = ;MOV ‘BUFLIM'' TO TEMP 

SUB TOTCC, TEMP [SUB TOTAL FROM ‘BUFLIM'’ 

MOV TEMP, CURCC SAND ESTABLISH NEW CURRENT 

ADD CURCC, TOTCC TADD “ADJUSTED CURRENT’’ TO TOTAL CHAR. 

RTS PC [RETURN TO CALLER 


SEQ 0086 


AMSGTRU,-(SP) 
o7(SP) 


"ima a aaa a a a aaa 


APPROPRIATE POINTERS IN PTRTAB POINTER TABLE 


ee peg t 
PC ,BLDBUF ;BUILD MESSAGE IN BUFFER AND ADD PTRS. 


j ef 
CVCLHB DPv=11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-65 SEQ 0087 
CVCLHB.P11 15=JUN=81 15:48 BUILD MESSAGE BUFFERS SUBROUTINE 
6205 .SBTTL BUILD MESSAGE BUFFERS SUBROUTINE 
07 zee 
6208 : FUNCTIONAL DESCRIPTION: 
6208 ; BLDBUF-- BUILD POINTER TABLE AND BUFFERS 
6211 : THIS SUBROUTINE ADDS A MESSAGE TO THE TRANSMIT OR EXPECT LIST 
ae ; USING THE POINTER, BYTE COUNT, AND ADDRESS PASSED TO IT. 
6214 INPUTS: : 
6215 : CURCC= CHAR. COUNT OF MESSAGE TO BE ADDED 
6216 ; CURADD= ADDRESS OF MESSAGE TO BE AD 
6217 ; CPTR= ADDRESS OF FOINTER TABLE WORD” WHERE MESSAGE POINTERS ARE 
6219 : MSGTYP= VALUE TO USE AS AN INDEX TO FIND SOURCE jor MESSAGE DATA 
6220 ; INDEX INTO DMSGCT() AND DMSGAD( 
6221 + OUTPUTS: 
6222 ; A MESSAGE ADDED TO EITHER TXBUF OR CMPBUF 


022234 RL DBUF : 

022234 010246 MOV R2.~(SP) SAVE R2 AND R3 ON THE STACK 
022236 010346 MOV R3,~-(SP) 

022240 013702 006520 MOV CPTR,R2 

022244 013722 006522 BLDB1: MOV CURADD , (R2)+ ;PUT CURRENT ADD ON POINTER TAB 
022250 013722 006514 MOV CURCC, (R2)+ PUT CURRENT CC ON POINTER TAB 
022254 010237 006520 MOV R2,CPTR PUT UPDATED R2 BACK TO CURRENT POINT 
022260 013702 006512 MOV MSGTYP,R2 GET MESSAGE TYPE TO USE AS INDEX 
022264 006302 ASL Re [DOUBLE FOR WORD INDEX 

022266 013737 006522 006530 MOV CURADD , TEMP SMOVE CURRENT ADD TO TEMP 

022274 063737 006514 006530 ADD CURCC, TEMP ADD CHAR COUNT TO IT TO GET END 
022302 013703 006522 MOV CURADD ,R3 SET R3 TO a START ADD 
022306 016237 002150 006534 BLDB2: MOV DMSGCT(R2),TEMP2. T BYTE COUNT 

022314 016204 002172 MOV DMSGAD(R2).R4 ;PUT STARTING FROM ADD IN R4 
022320 060437 006534 ADD R4,TEMP2 SADD IT TO TEMP2 TO GET END OF FROM 
022324 112423 BLDB3: MOVB (R4)+, (R3)+ [MOV BYTE FROM PATTERN TO BUFFER 
022326 020337 006530 CMP R3, TEMP zALL DONE? 

022332 001404 BEQ BLDBEX z1F SO EXIT 

022334 020437 006534 CMP R4, TEMP2 31S PATTERN cee EXPIRED 

022340 001762 BEQ BLDB2 :1F SO GO START AGAIN 

022342 000770 BR BLDBS :IF NOT GET ANOTHER BYTE 

022344 063737 006514 006522 BLDBEX: ADD the CURADD [BUMP CURADD 

022352 012603 MOV =—s (SP) +, R3 SRESTORE R3 AND R2 

022354 012602 MOV (SP) +.R2 


022356 000207 RTS PC ;RETURN TO CALLER 
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CVCLHB.P11 15=JUN-81 15:48 CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST 
ett ‘ .SBTTL CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST 
6259 p++ 
6260 THIS ROUTINE ADDED FOR REV B BY EC 
6261 {FUNCTIONAL DESCRIPTION: 
6262 ; FACSIMILE: a ROUTINE i USED TO CREATE A FACSIMILE OF THE 
6263 é OF THE T IT LIS TRANSMIT BUFFER IN THE 
6264 : EXPECTED LIST AND EXPECTED BUFFER. THE ROUTINE IS 
6265 ; NORMALLY CALLED WHEN USER COMMAND ‘'SFT E CXPECTJ= 
ocee : T CRANSMIT] IS ENTERED. 
6268 é CALLING SEQUENCE: JSR PC,FACSIMILE 
6590 
6271 3 DEFINITIONS CMPBUF = EXPECTED DATA BUFFER HOLDS MAX 512 BYTES 
6272 ; TXBUF = TRANSMIT DATA BUFFER HOLDS MAX 512 BYTES 
6273 : TTOTCC = NUMBER OF BYTES IN TXBUF 
6274 2 PTRTAB = TOP OF MESSAGE LIST POINTER TABLE 
6275 ; CTOTCC = NUMBER OF BYTES IN EXPECT MESSAGE 
6276 ; CMPTOT = NUMBER OF EXPECTED MESSAGES 
6277 5 CMPPTR = EXPECTED MESSAGE LIST POINTER 
6278 : TXPTR = TRANSMIT MESSAGE LIST POINTER 
6279 : TXMTOT = NUMBER OF TRANSMIT MESSAGES 
6280 ; CCURAD = STORAGE ADDRESS OF MESSAGE IN CMPBUF 
oct . MSGLIN = MAXIMUM NUMBER OF MESSAGES THAT CAN BE STORED 
6283 BEGIN FACSIMILE ROUTINE 
6284 (*COPY TXBUF ==> CMPBUF *) 
6285 .- SAVE R1 
6286 -- INIT o 
6287 . REPEAT 
6288 - + «+ COMPBUF JR1= CTXBUF JR1 
6289 .R1= 
oc * UNTIL RI = BUFLIM 
6292 (*NOW CALCULATE EXPECT LIST + eee POINTER*®) 
6293 .-CMPPTR = PTRTAB + (2 * MSGLIM 
6295 (*NOW PRIME ie WHILE - DO LOOP*) 
6296 ~-TXPTR = PTRTAB 


6297 : ee 


CURAD = CMPBUF 
.-TXPTR = TXPTR + 2 
--CTOTCC = CTXPTRI 

MPTOT = 


"WHILE TXMTOT <> CMPTOT DO 
eeenee a = AD 


C 
-+-TXPTR = TXPTR + 4 
URAD 


6306 ieee = CCURAD + CTOTCC 
6307 weeeCTOTCC = CTXPTRI 

6308 ..CMPPTR = CMPPTR + 2 
6309 weeeCMPTOT = CMPTOT + 1 
6310 --END WHILE DO 


-CTOTCC = TTOTCC 
END FACSIMILE ROUTINE 





. 
CVCLHB DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-67 SEQ 0089 


CVCLHB.P11 15=JUN=81 15:48 CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST 
6313 
oai9 022360 FACSIMILE: 
6316 022360 010146 MOV R1,~(SP) ; SAVE R1 
6317 022362 5001 CLR R1 ZINIT R1 
6318 022364 116161 003144 005144 10S: MOVB TXBUF (R1) , CMPBUF (R1) SCOPY TX | iin TO EXPECTED BUFFER 
6319 022372 005201 INC R1 ;BUMP | 
6320 022374 020127 001000 CMP R1 ,ABUFLIM zALL_DATA COPIED ? 
oss) 022400 001371 BNE 10$ NO, BRANCH 
6323 022402 012701 000017 208: MOV #MSGLIM,R1 sMESSAGE LIMIT 
6324 022406 006301 ASL R1 MULTIPLY BY 2 
6325 022410 006301 ASL R1 sMULTIPLY BY 2 
6326 022412 012737 006144 006440 MOV #PTRTAB, CMPPTR ;TOP OF POINTER TABLE 
6327 022420 060137 006440 ADD R1,CMPPTR TSTART OF EXPECTED POINTER TABLE 
ores 022424 005001 CLR R1 ZINIT R1 
6330 ;SET UP WHILE = DO LOOP 
6331 022426 012737 006144 006436 MOV #PTRTAB, TXPTR 3 TX POINTER NOW AT TOP OF TABLE 
6332 022434 012737 005144 006446 MOV #CMPBUF , CCURAD [TRANSFER ADDRESS OF 1ST MESSAGE 
6333 022442 062737 000002 006436 ADD #2, TXPTR [BUMP POINTER 
6334 022450 017737 163762 006444 MOV aTXPTR,CTOTCC SBYTE COUNTER 1ST MESSAGE 
O33? 022456 005037 006442 CLR CMPTOT INIT EXPECTED MESSAGE COUNT 
6337 WHILE TX MESSAGE TOTAL <> EXPECTED MESSAGE TOTAL DO 
6338 022462 023737 006456 006442 30$: CMP TXMTOT ,CMPTOT ALL MESSAGES COPIED ? 
6339 022470 001430 BEQ 40$ 7 YES ,BRANCH 
6340 022472 013777 006446 163740 MOV CCURAD ,a@CMPPTR T TRANSFER ADDRESS OF MESSAGE 
6341 022500 062737 000002 006440 ADD #2,CMPPTR ;BUMP POINTER 
6342 022506 013777 006444 163724 MOV CTOTCC,aCMPPTR BYTE ue OF MESSAGE 
6343 022514 062737 000004 006436 ADD #4,TXPTR ;BUMP TX MESSAGE POINTER 
6344 022522 063737 006444 006446 ADD CTOTCC, CCURAD : CALC. TRANSE ER_ ADDRESS 
6345 022530 017737 163702 006444 MOV aTXPTR,CTOTCC 7BYTE COUNT NEXT MESSAGE 
6346 022536 062737 000002 006440 ADD #2,CMPPTR [BUMP POINTER 
6347 022544 005237 006442 INC CMPTOT : INCREMENT MESSAGE COUNT 
6348 022550 000744 BR 30$ :D0 IT AGAIN 
6349 ;END WHILE = DO 
43 022552 013737 006460 006444 40$: MOV TTOTCC,CTOTCC ;COPY TOTAL CHARACTER COUNT 
6352 END ROUTINE 
6353 022560 012601 MOV (SP)+,R1 RESTORE R1 


6354 022562 000207 RTS PC ; RETURN 

































CVCLHB.P11 15=JUN-81 


6379 022564 013702 
6 006302 


001003 

6387 022620 01 5 16 24 
6385 022634 01 3737 
(11) 022642 013746 


(4) 0226 

6391 

6392 022702 
22 


022 
022772 





007676 


000014 
013517 
000001 


013515 
01 eh 


013526 
013540 
000004 


013536 


CVCLHB DPV-11 DATA COMM, istl* TEST 


006530 


006536 


006536 
006532 
006534 


7? 
MACY11 30A(1052) 16-JUN-81" 10:00 PAGE 12-68 SEQ 0090 


SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS 


. SBTTL SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS 
FUNCTIONAL DESCRIPTION: 
SHWOP = SHOW MODE OF OPERATION, LOOP, QULAIFIERS 
PRINTED ON THE OPERATOR'S CONSOLE. 
INPUTS: 
DEV1= MODE TYPE (MODTYP) 
DEV2= MAINT LOOP TYPE (MLTYP) 
DEV3= ‘RUN PASS‘ COUNT (RPASS) = COUNT DOWN 
DEV4=  PARAMTERS WORD (PARAM) 


SHWOP : 


10$: 


2$: 


IMPLICIT INPUTS 
MODE 


LOOPS= 


PRINTS 


TABLE OF ADDRESSES OF MODE NAME STRINGS 
TABLE OF ADDRESSES OF LOOP TYPE NAMES 


CALLING SEQUENCE: 
JSR PC,SHWOP 


DEV1,.R2 GET THE MODE TYPE IN R2 

R 7MAKE IT A WORD TABLE OFFSET 
MODES(R2),TEMP ;GET ADDRESS OF MODE-IN-ASCII 

+ ae [GET MAINTENANCE LOOP TYPE 
#LPOO, TEMPS ;LOAD TEMP3 TO POINT TO ‘'/LOOP="" 
Re 7SEE IF /LOOP=XXXXX OR NONE 
10$ ; BR IF /LOOP= OF SOME 


KIND 
#LPO, TEMP3 ‘IF NO LOOP THEN DON'T PRINT ‘‘/LOOP="' 
LOOPS (R2) , TEMP1 :GET ADDRESS OF pkQOP=IN-ASCII 
DEV3, TEMP T NUMBER OF PASSES 
OSHFO. TEMP, TEMP3, TEMP). TEMP2 
MOV TEMP2,-(SP) 


MOV #5 ,~(SP) 
MOV SP, 
TRAP C 


ADD #14,SP 
NOW SET UP FOR QUALIFIERS IN ASCII 


#PST, TEMP 
#STATB, DEVS 7SEE_ IF /STATUS OR /NOSTATUS 
1$ ;BR IF /STATUS 


wPNS 1 Tew 
WDATCKB,DEV4 SEE IF /CHECK OR /NOCHECK 
$ ‘BR IF /CHECK 
#PNCK TEMP 
C, TEMP2 


4 CHOB, DEV4 SEE IF /ECHO OR /NOECHO 
3$ :BR IF /ECHO 
#PNEC , TEMP2 








CVCLHB DPV-11 DATA COMM, LINK 


CVCLHB.P11 15=JUN=81 15:48 





012737 
032737 
001003 
012737 


013746 


013547 
000010 


013545 


TEST 


006542 
007704 


006542 


MACY11 30A(1052) 


3$: 


5$: 


7 
16-JUN-81" 10:00 PAGE 12-69 


SHOW MODE OF rE ae LOOP TYPE AND QUALIFIERS 


RTS 


#PMS , TEMPS 
AMOCHK ,DEV4 SEE IF /MODEM OR /NOMODEM 
IF MODEM 


5$ 3 
#PNMS , TEMPS 


MSHF 1, TEMP, TEMP1, TEMP2, TEMPS 3 TEMP3,TEMP4 **RFU®® 


PC RETURN 


SEQ 0091 


TEMPS ,~ (SP) 


#14,SP 


8 
CVCLHB DPV=-11 DATA om, LINK TEST MACY11 30A(1052) 16-JUN-81" 10:00 vines 12-70 


. SEQ 9092 
CVCLHB.P11 15=JUN-81 15:48 TRAVERSE COMMAND LINE SUBROUTINE 
O32 .SBTTL TRAVERSE COMMAND LINE SUBROUTINES 
6435 3 ++ 
9k) 5 PS$TRV SUBROUI TNE 
6438 PARSE THE COMMAND LINE SUBROUTINE 
6439 ; TAKE ACTIONS (VIA ACTION TREE) AS PARSING LINE 
6440 * PARSING DIRECTIONS FROM ‘CLI PARSING NODES*’ 
ere! : REGS USED: 
6443 s R1,R5=SCRATCH P$SNUM=NUMERIC CODE FROM DATA 
6444 ; R2=ACTION CODE PARAMETER FROM TREE 
6445 : R3=PARSE TREE POINTER 
6446 2 R4=INPUT STRING POINTER 
6447 : CALLING SEQUENCE: 
6448 : JSR PC,PS$TRV 
6449 7 
6450 
6451 023066 P$TRV: 
6452 023066 013704 003126 MOV P$BUFA,R4 
6453 023072 013703 003130 MOV P$TREE,R3 
6454 023076 105714 P$TRS: TSTB (R4) sSEE IF ANY CHARS LEFT IN INPUT STRING 
6455 023100 6001441 BEQ PSEXIT ‘BR IF NO 
6456 023102 121327 000013 CMPB (R3) A411. ;SEE IF SPECIAL CLI CHAR CODE OR ASCII 
6457 023106 003023 BGT 20$ ‘BR IF REGULAR ASCiI CHAR. 
6458 023110 111305 MOVB (R3),R5 ;GET SPECIAL CHAR CODE INTO RS 
6459 023112 00630 ASL RS 
6460 023114 016505 023130 MOV 10$(R5),R5 ;BUILD TRAVERSE ROUTINE ADDRESS 
6461 023120 062705 023130 ADD #10$.R5 
6462 023124 004715 JSR PC, (R5) ;JSR TO SPECIAL CLI TRAVERSE ROUTINE 
6463 023126 000763 BR P$TRS :GO SEE IF MORE OF STRING LEFT 
6465 
6466 023130 000114 10$: . WORD TRVERR-10$ ; TRAVERSE TABLE FOR ‘‘CLI FUNTIONS'* 
6467 023132 000134 WORD TRVEXI-10$ 37 
6468 023134 000152 «WORD TRVBR-10$ sa 
6469 023136 000162 .WORD TRVBIF-10$ 33 
6470 023140 000204 -WORD TRVSPA-10$ 34 
6471 023142 000270 .WORD  TRVNUM-10$ 35 
6472 023144 . WORD TRVALP-10$ 36 
6473 023146 50 - WORD TRVALN-10$ cy 
6474 023150 000270 -WORD TRVOCT-10$ 38 
6475 023752 000256 -WORD  TRVDEC-10$ 19 
mre 023154 000736 .WORD  TRVSTR-10$ 210 
6478 ;NOT A SPECIAL CODE 
‘ 
6480 023156 121314 20$: CMPB (R3),(R4) ;SEE IF FIRST CHAR OF STRING IS A MATCH 
6481 023160 001403 BEQ 22$ :BR IF A MATCH 
6482 023162 004737 023226 JSR PC, TRVBRC s IF NOT A MATCH, GO TAKE MISS BRANCH 
6483 023166 000743 BR P$TR5 : THEN GO BACK PT'G TO MISS NODE 
6484 023170 004737 023206 22$: JSR PC, TRVACT ‘IF A MATCH, GO DO ACTION DEFINED BY 
6485 023174 062703 000004 ADD #4 ,R3 : ACTION CODE IN CLI NODE, THEN 
6486 : ADJUST PTR TO NEXT CLI NODE 
6487 023200 005204 INC : R4 ;ADJUST BUF PTR TO NEXT CHAR IF MATCH 


6488 023202 000735 BR P$TRS 


. 
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CVCLHB.P11 15=JUN-81 15:48 VERSE COMMAND LINE SUBROUTINES 
6489 
6490 023204 000207 PSEXIT: RTS PC :RETURN FROM PARSER 
6492 as arate tint aaa ne 
6493 , 
6494 ;GOTO_USER ACTION ROUTINE 
6495 023206 116302 000001 TRVACT: MOVB. —«.1(R3),R2 :GET ACTION CODE ROM CLI NODE 
6496 023212 042702 177400 BIC #177400,R2 *CLEAR ANY SIGN EXTENSION 
6497 023216 013705 003132 MOV PSACT,R5 ‘GET ADDRESS OF CLI ACTION ROUTINE 
6498 023222 004715 JSR PC, (RS) :GO_DO ACTION DEFINED BY CODE 
6499 023224 000207 RTS PC “RETURN TO CALLING CODE 
6501 : TAKE BRANCH IN TREE 
6502 023226 016305 000002 TRVBRC: MOV 2(R3) RS | ;GET BRANCH DISPLACEMENT FROM TREE 
6503 023232 060503 ADD R5,R3 + AND POINT R3 TO THE 'MISS'' NODE 
6904 023234 000207 RTS PC + RETURN TO PS$TRV 
6506 :NO BRANCH TAKEN 
6507 023236 062703 000004 TRVNOB: ADD #4 ,R3 : THINGS OK, UPDATE R3 TO POINT TO NEXT 
6908 023242 000207 RTS PC t NODE AND RETURN TO PSTRV. 
6510 fe 
6511 023244 004737 023206 TRVERR: JSR PC, TRVACT : TAKE ERROR ACTION 
6512 023250 112737 177777 003143 MOVB = #1, P$GDBD [SET ERROR RETURN FLAG 
6513 023256 005726 , TST (SP5+ ‘GET RID OF 'USR PUSH TO TRVERR’’ 
6914 023260 000137 023204 JMP P$EXIT SRETURN DIRECT TO EXIT OF P$TRV ROUTINE 
6516 023264 004737 023206 TRVEXI: JSR PC, TRVACT : TAKE EXIT ACTION 
6517 023270 105037 003143 CLRB § P$GDBD [SET GOOD/BAD FLAG TO ‘‘SUCCESS (0)"* 
6518 023274 005726 TST (SP) + :GET RID OF ‘USR PUSH TO TRVEXI'’ 
6519 023276 000137 023204 JMP PSEXIT ‘RETURN DIRECT TO EXIT OF P$TRV ROUTINE 
6521 023302 004737 023206 TRVBR: JSR PC, TRVACT :GO TAKE BRANCH ACTION 
6922 023306 000137 023226 JMP TRVBRC 
6524 023312 004737 023206 TRVBIF: JSR PC, TRVACT 
6525 023316 105737 003143 TSTB  P$GDBD :SEE IF PS$GDBD SET OR CLEARED BY ACTION 
6526 023322 001402 . BEQ 1$ ‘IF CLEAR FALL THRU TO NEXT NODE 
6527 023324 000137 023226 MP TRVBRC ‘ELSE TAKE THE 'MISS’’ BRANCH 
6928 023330 000137 023236 1$: IMP TRVNOB ‘JUST UPDATE TO NEXT NODE IF THINGS OK 
6530 023334 005005 TRVSPA: CLR R5 =CLEAR ‘SPACE OR TAB FOUND'' FLAG 
6531 023336 121427 000011 1$: (MPR (RG) , #11 >SEE IF CHAR. IN CMD LINE= TAB 
6532 023342 001003 BNE 2$ =BR IF NO, NOT A TAB 
6533 023344 005204 INC R4 [INC INPUT STRING POINTER 
6534 023346 005205 INC R5 : INDICATE A TAB FOUND 
6935 023350 000772 BR 1$ 7 *GO CHECK NEXT CHAR 
6537 023352 121427 000040 2$: CMPB —s_ (R4&) , #40 :SEE IF CHAR. IN CMD LINE= SPACE 
6538 023356 001003 BNE 10$ ‘BR IF NO, NON-SPACE OR NON-TAB CHAR. 
6539 023360 005204 INC R4 ‘INC INPUT STRING POINTER 
6540 023362 005205 INC RS S INDICATE A SPACE F OUND 
6541 023364 000764 BR 1$ 'GO CHECK NEXT CHAR 
6542 023366 005705 10$: TST R5 “SEE IF ANY SPACES OR TABS FOUND 
6543 023370 001404 BEQ 15$ ‘BR IF NO, TAKE NO ACTION 


6544 023372 004737 023206 JSR PC, TRVACT :GO TAKE ACTION IF ANY FOUND 
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CVCLHB.P11 15=JUN=81 15:48 TRAVERSE COMMAND LINE SUBROUTINES 


6545 023376 000137 023236 JMP TRVNOB :JUST GO UPDATE R3 TO NEXT NODE IF OK 
6546 023402 000137 023226 15$:  JMP TRVBRC ‘TAKE BRANCH (MISS) IF NONE FOUND 
6548 
6549 023406 012737 000012 003140 TRVDEC: MOV #10. ,PSRADX SUSE DECIMAL AS RADIX AND ASSUME + 
6550 023414 000137 023426 JMP TRVNMA 
023420 TRVOCT: ; (SAME AS TRVNUM SINCE DEFAULT RADIX IS OCTAL) 
6552 023420 012737 000010 003140 TRVNUM: MOV #8. ,PSRADX sUSE OCTAL AS RADIX AND ASSUME + 
6553 023426 005005 TRVNMA: CLR R5 ;CLEAR DIGIT COUN TER 
54 023430 121427 000053 CMPB ss (RG) A+ ‘SEE IF THERE'S A + SIGN THERE 
6555 023434 001001 BNE 10$ > BR IF NO 
6556 023436 000406 BR 11$ : ELSE P$RADX ALREADY SAYS +, JUST BR 
6557 023440 121427 000055 10$: CMPB = (R4) ,A*= ;SEE IF THERE" S A = SIGN THERE 
6558 023444 001004 BNE 1 ; BR IF 
6559 023446 112737 177777 003141 MOVB = #=1, PSRADX+1 SET A AINUS FLAG'’ (HI BYTE OF P$SRADX) 
tee 023454 005204 11$: INC RS * BUMP R4 TO POINT TO FIRST CHAR 
6562 023456 121427 000060 1$: CMPB ss (RG) , #60 :SEE IF CHAR. LESS THAN A ‘0"' 
6563 023462 002434 BLT 2$ ‘BR IF YES (NOT NUMERIC) 
023464 121427 000067 CMPB  —s- (R44) , #67 ;SEE IF CHAR. GREATER THAN A ‘7"' 
6565 023470 003426 BLE 13$ : BR IF YES 
66 023472 123727 003140 000012 CMPB —s- P$RADX, #10. :SEE IF IN DECIMAL MODE 
6567 023500 001417 BEQ 12$ : BR IF YES (CAN USE HIGHER LIMIT) 
568 023502 121427 000071 CMPB ss (RG) , #71 “SEE IF DIGIT WAS A 8 OR 9 
6569 023506 003022 BGT 2s “BR IF NON-NUMERIC 
6570 023510 PRINTF 4CLIBRX sELSE WAS A 8 OR 9 WHEN IN OCTAL RADIX 
(7) 023510 012746 011650 MOV #CLIBRX,-(SP) 
(6) 023514 012746 000001 MOV #1,-(SP) 
(3) 023520 010600 MOV SP.RO 
(4) 023522 104417 TRAP 
(4) 023524 062706 000004 ADD #4 ,SP 
6571 023530 112737 177777 003143 MOVB #-1,P$GDBD SET ERROR RETURN FLAG 
6276 023536 000474 BR 5$ ; PRINT ERROR AND TAKE MISS 
6574 023540 121427 000071 12$:  CMPB — (R4),, #71 :SEE IF CHAR. GREATER THAN A ‘9"' 
6575 023544 003003 BGT 2$ :BR IF YES (NOT NUMERIC) 
6576 023546 005204 13$: INC RG ‘UPDATE CMD LINE PTR TO NEXT CHAR. 
6577 023550 005205 INC R5 ‘INDICATE A NUMERIC FOUND 
6578 023552 000741 BR 1$ *GO LOOK AT NEXT CHAR. 
- 6580 023554 005705 23: TST RS :SEE IF BOUND ANY NUMERICS 
6581 023556 001464 . BEQ 5$ BR IF TAKE 'MISS'* BRANCH 
6582 023560 010401 MOV R4,R1 ‘GET POINTER TO START OF NUMERIC STRING 
6583 023562 160501 SUB R5.R1 
$84 023564 005037 003136 CLR P$NUM :CLEAR LOC. WHERE VALUE WILL BE STORED 
6585 23570 112102 3$: MOVB (R1)+,R2 GET ASCII CHAR AND CONVERT IT TO A #4 
6584 023572 162702 000060 SUB #60,R2 
6587 023576 006337 003136 ASL P$NUM :SHIFT CURRENT VALUE TO MAKE ROOM 
588 023602 103437 BCS 7$ ‘ERROR IF NUMBER TOO BIG 
6589 023604 013737 003136 003134 MOV P$NUM, PSCNT ‘SAVE FOR LATER IN CASE DECIMAL RADIX 
6590 023612 006337 003136 ASL P$NUM 
6591 023616 103431 BCS 7$ ;ERROR IF NUMBER TOO BIG 
6592 023620 006337 003136 ASL P$NUM 
6593 023624 103426 BCS 7$ :ERROR IF NUMBER TOO BIG 
6594 023626 123727 003140 000012 CMPB — P$RADX,,#10. [SEE IF DECIMAL RADIX 
00100 BNE 4$ ‘BR IF NOT EQUAL 


E 8 
RO DPV=11 DATA COMM, LINK TEST MACY11 ag eh fst 16=JUN-81 10:00 rims 12-73 SEQ 0095 


CVCLHB.P11 15=JUN=81 15:48 ERSE COMMAND LINE SUBROUTINES 

6596 023636 063737 003134 003136 ADD P$CNT ,P$NUM 

6597 023644 103416 BCS 7$ ERROR IF NUMBER TOO BIG 

6598 023646 060237 003136 4$: ADD R2,PS$NUM 

6599 023652 103413 BCS 7$ ERROR IF NUMBER TOO BIG 

6600 023654 005305 DEC R5 

6601 023656 001344 BNE 3$ 

6602 023660 105737 003141 TSTB P$RADX+1 ; SEE ‘IF NUM WAS PRECEDED BY A = SIGN 

6603 023664 001402 BEQ 15$ ; BR _IF NO 

6604 023666 005437 003136 NEG P$NUM ; ELSE NEGATE THE NUMBER hee a LEAVING 

6605 023672 004737 023206 15$: JSR PC, TRVACT [SINCE NUMERIC FOUND, GO TAKE ACTION 

oon 023676 000137 023236 JMP TRVNOB 3GO POINT R3 TO NEXT NODE 

6608 023702 7$: PRINTF #CLINBG ;PRINT NUMBER TOO BIG ERROR 
(7) 023702 012746 011626 MOV ACL INBG,-(SP) 
(6) 023706 012746 000001 MOV #1,-(SP) 
(3) 023712 010600 MOV SP ,RO 
(4) 023714 104417 TRAP C 
(4) 023716 062706 000004 #4 ,SP 

6609 023722 112737 177777 003143 MOVB #-1 ,P$GDBD 4 7 ERROR RETURN FLAG 

ory 023730. 000137 023226 5$: JMP TRVBRC AKE ‘'MISS'' BRANCH 

6612 

6613 023734 C05005 TRVALP: CLR RS ;CLEAR ALPHA FOUND FLAG 

6614 023736 121427 000101 1$: CMPB (R4) ,4101 [SEE IF CHAR. LESS THAN A ‘‘A’' 

6615 023742 002406 BLT 2$ ;BR IF YES (NOT ALPHA) 

6616 023744 121427 000132 CMPB (R4) 4132 SEE IF CHAR. GREATER THAN A ‘'2"' 

6617 023750 003003 BGT 2$ SBR IF YES (NOT ALPHA) 

6618 023752 005204 INC R4 UPDATE CMD LINE PTR TO NEXT CHAR 

6619 023754 005205 INC R5 ; INDICATE AN ALPHA WAS FOUND 

6620 023756 000767 BR 1$ [GO LOOK AT NEXT CHAR 

6621 023760 005705 2$: TST R5 [SEE IF ANY ALPHA'S WERE FOUND 

6622 023762 001404 BEQ 3$ BR IF NO 

6623 023764 004737 023206 JSR PC, TRVACT :1F ANY FOUND TAKE ACTION 

6624 023770 000137 023236 JMP TRVNOB ;THEN UPDATE R3 TO NEXT NODE -NO BRANCH 

rat 023774 000137 02322é 3$: JMP TRVBRC ZNONE FOUND, TAKE MISS BRANCH 

6627 024000 005005 TRVALN: CLR R5 :CLEAR ALPHANUM FOUND _— 

6628 024002 121427 000060 . 108: CMPB (R4) ,460 7SEE IF CHAR. LESS THAN A ‘0"' 

6629 024006 002417 BLT 2$ ;BR_IF YES (NOT NUMERIC OR ALPHA) 

024010 121427 000072 CMPB (R4) ,A72 SEE IF CHAR. GREATER THAN A ‘9°' 

6631 024014 003003 BGT 1$ ;BR IF YES (NOT NUMERIC) 

6632 024016 005204 INC R4 ;UPDATE CMD LINE PTR TO NEXT CHAR, 

6633 024020 005205 INC R5 ; INDICATE A NUMERIC FOUND 

6634 024022 000767 BR 10$ [GO LOOK AT NEXT CHAR. 

6635 024024 121427 000101 1$: CMPB (R4) ,4101 SEE IF CHAR. LESS THAN A ‘‘A"’ 

6636 024030 002406 BLT 2$ :BR IF YES (NOT ALPHA) 

6637 024032 121427 000132 CMPB (R4) ,4132 SEE IF CHAR. GREATER THAN A ‘'2°' 

6638 024036 003003 BGT 2$ 7;BR_IF YES (NOT ALPHA) 

6639 024040 005204 INC R4 ;UPDATE CMD LINE PTR TO NEXT CHAR 

6640 024042 005205 INC R5 : INDICATE AN ALPHA FOUND 

6641 024044 000756 BR 10$ :GO LOOK AT NEXT CHAR 

6642 024046 005705 2$: TST R5 7 SEE Md ANY ALPHANUM'S WERE FOUND 

6643 024050 001404 BEQ 3$ :BR IF NO 

6644 024052 004737 023206 JSR PC, TRVACT IF ANY FOUND TAKE ACTION 

6645 024056 000137 023236 JMP TRVNOB ;THEN UPDATE R3 TO NEXT NODE -NO BRANCH 


6646 024062 000137 023226 3$: JMP TRVBRC ZNONE FCUND, TAKE MISS BRANCH 





| F 8 
MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-74 
TRAVERSE COMMAND LINE SUBROUTINES 


CVCLHB DPV-11 DATA COMM. tit TEST SEQ 0096 


CVCLHB.P11 15=JUN-81 


024150 
024152 


000006 
003134 


003134 


003134 


023206 
000004 


023226 


TRVSTR: MOV 
MOV 


2$: 


10$: 


R1,R4 

PC, TRVACT 
4(R3) ,R3 
PC 


TRVBRC 


;POINT R1 TO CMD STRING 


;POUNT RS TO MATCH STRING FROM CLI NODE 
;CLEAR CHAR MATCH COUNT 

:SEE IF END OF MATCH STRING YET 
SBR_IF YES 

;SEE IF END OF CMD LINE YET 


SBR IF YES 
:SEE IFS CHARACTERS MATCH 


[MATCH =INCREMENT MATCH COUNT 
;UPDATE STRING POINTERS 


;BR TO CONTINUE CHECKING CHARS. 


WHEN DONE SEE IF ANY MATCHES FOUND 
:BR IF NO, GO TAKE THE MISS BRANCH 
[POINT CMD POINTER 70 END OF STRING & 
;1F A_MATCH FOUND, GO DO MATCH ACTION 
; UPDATE R3 TO NEXT NODE (NO BRANCH) 
(NO RET THRU TRVNOB SINCE DIFFERNT 
DISPLACEMENT DUE TO MATCH STRING) 
GO TAKE BRANCH 





meso SO Oe Ce Ce a ee ee -— 


CVCLHB.P11 15=JUN-81 15:48 REPORT CODING SECTION 


G 8 
| CVCLHB DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) _16-JUN-81 10:00 PAGE 12-75 SEQ 0097 
| 6678 .SBTTL REPORT CODING SECTION 


eg 
6682 3 THE REPORT CODING SECTION CONTAINS THE 
6683 ; ‘PRINTS'’ CALLS THAT GENERATE STATISTICAL REPORTS. 


es Me 
024156 BGNRPT 
(3) 024156 LSRPT:: 


6700 024156 004737 020302 JSR PC,REPORT | ;CALL SUBROUTINE TO DUMP EVENT LOG 
6701 ; AND BASE TABLE 


6718 024162 ENDRPT 
(3) 024162 : 10010: 
(3) 024162 104425 TRAP C$RPT 





H 8 
| CVCLHB DPV=11 DATA i. qty TEST MACY11 fon tie 16-JUN-81 10:00 PAGE 12-76 SEQ 0098 
CVCLHB.P11 15=JUN=81 15:48 PROTECTION TABLE 


6720 -SBTTL PROTECTION TABLE 

6721 

6722 zoe 

6723 : THIS TABLE IS USED BY THE RUNTIME SERVICES 

6724 ; TO PROTECT THE LOAD MEDIA. 

6725 3a 

6726 

6727 024164 BGNPROT 

oSoa 024164 L$PROT:: 
6729 024164 177777 -1 ;OFFSET INTO P=TABLE FOR CSR ADDRESS 
6730 024166 177777 -1 sOFFSET INTO P=TABLE FOR MASSBUS ADDRESS 
ora) 024170 177777 -1 sOFFSET INTO P=TABLE FOR DRIVE NUMBER 


6733 024172 ENDPROT 





CVCLHB DPV=11 DATA on LINK TEsT 


| CVCLHB.P11 


024172 
024172 


024172 


024262 
024266 


oes ce 


024322 
024324 


15=JUN=81 


005037 
104444 
012737 


012700 
104447 


103417 


012700 
104447 


103513 


012700 
104447 


103002 
000137 
012700 
104447 


103521 
000523 


005037 
005037 


012702 


15:48 


006556 
006556 


177777 
000040 


000037 


000036 


024714 
000035 


006560 


006624 





MACY11 30A(1052) 


I 
16=JUN=81 


INITIALIZE SECTION 


- SBTTL 


INITIALIZE SECTION 


8 
10:00 PAGE 12-77 


5 
; THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED 
3; AT THE BEGINNING OF EACH PASS. 


INIT1: 


Sts 


START: 


S2: 


BGNINIT 

TST DCLFLG 

BEQ INIT1 

CLR DCLFLG 

DOCLN 

MOV #-1 ,RESFLG 
READEF #EF.START 
BCOMPLETE START 
READEF #EF .RESTART 
BCOMPLETE RESTR 
READEF #EF.CONTINUE 
BNCOMPLETE $1 
JMP ~~ ENDIT 

READEF #EF .NEW 
BCOMPLETE NEW 
BR GETPRM 

CLR RESFLG 

CLR CLKVEC 

MOV ACLKCSR,R2 
CLOCK L,RI1 
BNCOMPLETE $2 
JSR PC,CLKSET 

MOV aL CLKEN, CLKEN 
BR RESTR 

CLOCK P,R1 


SEQ 0099 
LSINIT:: 
; CLEANUP AND EXIT? REV B EC 
=NO,BRANCH REV B EC 
= CLEAR FLAG REV B EC 
GO CLEANUP AND EXIT REV mR EC 
CS$DCLN- 
;SET RESTART FLAG 
; IF HERE CAUSE OF START,DO SOME INIT 
MOV #EF .START,RO 


TRAP CSREFG 

BCS START 
7; 1F HERE CAUSE OF RESTART, DO SOME INIT 

mov MEF RESTART .RO 
TRAP CSREFG 


BCS RESTRT 
SEE IF WE*RE HERE CAUSE or A CONTINUE 
MOV MEF .CONTINUE ,RO 
TRAP C$REFG 
;BR IF NOT HERE CAUSE a natn 


$1 
;JMP IF HERE CAUSE OF A CONTINUE 
[SEE IF THIS IS A ‘NEW oe 


T 


TRAP 
;1F YES, BR AROUND LOGUNIT # SETUP 
BCS NEW 


CLEAR RESTART FLAG SINCE HERE ON START 
CLEAR abe “By PTR. AS A FLAG IN 


; NO CLOCK IS FOUND. 
: SETUP RD AS A oa TO CLOCK INFO BLOCK 
LOOK FOR A LINE CLOCK 
MOV #°L,RO 
TRAP CSCLCK 


MOV RO,R1 
; IF NONE THERE GO LOOK FOR A PCLOCK 


BCC S 
GO SET UP CLOCK INFO TABLE @ CLK VEC. 
"SETUP THE ENABLE LINE CLOCK DATA 


;LOOK FOR A P=CLOCK SINCE NO LINE CLOCK 


—-----------— 


| 


CVCLHB DPV-11 DATA COMM. LINK TEST 
CVCLHB.P11 48 


024324 
02 


024364 
024372 
024374 


024440 
024442 


024522 


024530 
024534 
024542 


024544 
024544 
024550 


15=JUN-81 


012700 
104462 
010001 


103017 
004737 


104407 


103021 
012737 
005037 
012737 
104443 


012746 
0600 


012737 


005237 
023737 
002367 


013700 
104442 


15: 
000120 


017422 
000002 
001600 
000002 
000111 


013712 
000001 


000004 
006626 
006630 
006622 
006644 
006642 
177777 
007546 
177777 


006552 
006552 


006552 


006614 


006620 
006614 


006632 


006552 


002012 


J 8 
MACY11 30A(1052) on O-IUN-81 10:00 PAGE 12-78 _ SEQ 0100 
INITIALIZE SECTI 
MOV #'P,RO 
TRAP —- C$CLCK 
MOV RO,R1 
BNCOMPLE TE $3 ; IF NONE THERE GO SEE If THIS IS tS! 
JSR PC,CLKSET ; ELSE GO SET UP CLOCK INFO & VECTOR 
ADD #2,CLKCSR :POINT CLKCSR TO P=CLK COUNT SET REG. 
MOV #PCLKCT,@CLKCSR ;LOAD CLK SET REG. WITH COUNT. VALUE 
SUB #2,CLKCSR :POINT CLKCSR BAC TO P=CLK CSR 
MOV #PCLKEN, CLKEN [SETUP THE ENABLE THE P=CLK DATA 
BR RESTR 
S3: READBUS ;READ BUS TYPE TO SEE IF ON AN LSI 
TRAP _— C$RDBU 
BNCOMPLETE $4 ;BR IF NOT, NO CHANCE OF A CLOCK 
MOV #100, CLKVEC ;LOAD 100 AS CLK VECTOR 
CLR CLKBR [LOAD 0 AS CLK INT. LEVEL 
MOV #CLKEN, CLKCSR SKLUDGE UP THE CSR & ENABLE DATA LOCS 
GMANID L5060,CLKHZ,D.377,50.,60.,YES 
TRAP  C$GMAN 
BR 10000$ 
-WORD CLKHZ 
“WORD TSCODE 
-WORD L5 
<WORD 377 
“WORD T$LOLIM 
{WORD = TSHILIM 
10000$: 
BR RESTRT 
S4: PRINTF #BDCLK INFORM OPR. NO CLOCK, ee EXIT INIT 
#BDCLK,-(SP) 
MOV #1,-(SP) 
MOV SP.RO 
TRAP —- CS$PNTF 
ADD #4,SP 
RESTRT: CLR TIMMIN :CLEAR TIME SINCE START LOCATIONS 
CLR TIMSEC 
MOV CLKHZ, TIMTCK ;LOAD TICKS/SEC 
MOV #EVTLOG,R2 TINIT EVENT TABLE TO ALL 1°S AFTER EACH 
MOV R2,EVTP > START OR RES AND INIT TABLE POINTER 
1$: MOV #-i, (R2)+ 
CMP Re. WEVTEND ;SEE IF REACHED END OF TABLE 
BNE [LOOP UNTIL DONE 
NEW: MOV #-1,LOGUNT sINITIALIZE LOGICAL UNIT # 
GETPRM: INC LOGUNT POINT TO | NEXT LOGICAL UNIT 
CMP LOGUNT ,L$UNIT TSEE IF PAST MAX. LOG. UNIT # 
BGE NEW :BR IF YES. AND START OVER 
GPHARD LOGUNT,R1 





:GET THE P-TABLE FOR THIS LOG. UNIT 
MOV LOGUNT ,RO 


TRAP CSCPHRO 


K 8 
CVCLHB DPV-11 DATA om, ix TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-79 SEQ 0101 
CVCLHB.P11 15-JUN=81 15:48 INITIALIZE SECTION 


(3) 024552 010001 RO,R1 

6844 024554 BNCOMPLETE GE TPRM 7; 1F NO P-TABLE AVAIL., GO. Ger NEXT ONE 

ence 024554 103365 BCC GE TPRM 

ons 024556 011137 006566 MOV (R1) ,FHDPLX ;PUT FULL OR HALF DUPLEX ANSWER IN LOC. 

6858 

1 34 ;DEVICE DEPENDENT PART OF GETTING INFO FROM P=-TABLE 

6861 024562 016137 000002 011416 MOV 2(R1) ,RXCSR STORE AWAY CSR ADDRESSES 

6863 

6864 024570 016137 000002 011420 MOV 2(R1) ,PCSAR 

6865 024576 062737 000002 011420 ADD #2,PC 

6866 024604 016137 000002 011422 MOV 2(R1) ,RDSR 

6867 024612 2737 011422 ADD #2,RDSR 

024620 016137 000002 011424 MOV 2(R1), TXCSR 
024626 062737 10 011424 ADD #4,TXCSR 

6870 634 016137 000002 011426 MOV 2(R1),TDSR 

yr fA 024642 062737 011426 ADD #6,TDSR 

6873 024650 016137 000004 011430 MOV 4(R1), INVEC STORE AWAY INPUT INTERRUPT VECTOR 

6874 024656 C©16137 000004 011432 MOV 4(R1) ,OUTVEC 

6875 024664 062737 000004 011432 ADD #4 ,OUTVEC ;BUILD OUTPUT INTERRUPT VECTOR 

6876 024672 016137 011434 MOV 6(R1), INTPRI STORE AWAY INTERRUPT PRIORITY 

6877 024700 016137 000012 011436 MOV 12(R1) ,OPTYP STORE AWAY DEVICE OPTION TYPE 

6878 024706 016137 000014 011472 MOV 14(R1) ,RNODE STORE AWAY THE REMOTE NODE TYPE 

6879 024714 ENDIT: 

6880 024714 SETVEC CLKVEC,MCLKINT ,#340 SETUP CLOCK VECTOR 
(7) 024714 012746 000340 MOV #340,-(SP) 
(6) 024720 072746 017446 MOV #CLKINT,~(SP) 
(5) 024724 013746 006620 MOV CLKVEC ,~(SP) 
(4) 024730 012746 000003 MOV #3,-(SP) 
(3) 024734 104437 TRAP CS$SVEC 

oak 024736 062706 000010 ADD #10,SP 

ons ;DEVICE DEPENDENT VECTOR SETUP 

6892 024742 SETVEC INVEC,#DVRXI,4PRI04 ;SETUP INPUT INTERRUPT VECTOR 
(7) 024742 012746 000200 MOV #PRI04,-(SP) 
(6) 024746 012746 034132 MOV #DVRXI,~CSP) 
(5) 024752 013746 011430 MOV INVEC,~(SP) 
(4) 024756 012746 000003 MOV #3,-(SP) 
(3) 024762 104437 TRAP C$SVEC 
(2) 024764 062706 000010 ADD #10,SP 

6893 024770 SETVEC OUTVEC ,ADVTX] ,A4PRI04 SETUP OUTPUT INTERRUPT VECTOR 
(7) 024770 012746 000200 MOV #PR104,-(SP) 
(6) 024774 012746 034626 MOV #DVTXI,-(SP) 
(5) 025000 013746 011432 MOV OUTVEC ,~(SP) 
(4) 025004 012746 MOV #3,-(SP) 
(3) 025010 104437 TRAP CSSVEC 
(2) 025012 062706 000010 ADD #10,SP 

6895 025016 SETPRI #PRIO0 ;SET THE ‘'RUN'' PRIORITY TO 0 


(3) 025016 012700 000000 MOV #PR100,RO 
(3) 025022 104441 TRAP C$SPRI 















L 8 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY1 L the wert, 16-JUN=81 10:00 PAGE 12-80 SEQ 0102 
CVCLHB.P11 15=JUN-81 15:48 INITIALIZE SECTION 


6896 025024 EXIT INIT 
(3) 025024 104432 TRAP CSEXIT 
6a? 025026 000002 «WORD L10012-. 


6909 
6910 -EVEN 


6912 025030 ENDINIT 
(3) 025030 L10012: 
02 _ TRAP 


5030 CSINIT 

















M. 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 bbe ta 16=JUN-81 16:00 PAGE 12-81 SEQ 0103 


CVCLHB.P11 15=JUN-81 15:48 AUTODROP SECTI 
-SBTTL AUTODROP SECTION 
oe 
3 THIS CODE EXECUTED aT AFTER THE INITIALIZE CODE IF 
3; THE ‘ADR’ FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO 
; SEE IF Mey” WILL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY 
; DROPPED FROM TESTING. 
025032 BGNAUTO 
025032 LSAUTO:: 
025032 ENDAUTO 
110013: 


025032 
025032 104461 TRAP C$AUTO 

















CVCLHB.P11 


6955 025050 
(3) 025050 
(3) 025052 


6971 025054 
(3) 025054 
025054 


CVCLHB DPV-11 DATA COMM, LINK TEST 
81 15:48 


15=JUN= 


005077 161554 
012700 000340 
104441 
104433 


104432 
000002 


MACY11_30A(1052) 


N 
16=JUN-81 


CLEANUP CODING SECTION 


-SBTTL CLEANUP CODING SECTION 


8 
10:00 PAGE 12-82 


4 THE CLEANUP CODING SECTION CONTAINS THE — THAT IS PERFORMED 
: _AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED 


BGNCLN 


CLR 
SETPRI 


BRESET 


EXIT 


- EVEN 
ENDCLN 


@CLKCSR 
#PRI07 


CLN 


LSCLEAN:: 


;DISABLE CLOCK 
SET PROCESSOR PRIORITY BACK TO 


;CLEAR ALL BEFORE END 


L10014: 


= 
TRAP 
TRAP 


TRAP 
« WORD 


TRAP 


SEQ 0104 


#PR107,RO 
C$SPRI 


C$RESET 


CSEXIT 
L10014-. 


CSCLEAN 












B 9 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=-JUN-81 10:00 PAGE 12-83 SEQ 0105 
CVCLHB.P11 15=JUN=81 15:48 DROP UNIT SECTION 


6973 .SBTTL DROP UNIT SECTION 
Ma 
6976 : THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
6977 > TO NO LONGER BE TESTED. 
6978 = 
6980 025056 BGNDU 
(3) 025056 L$DU:: 


6991 025056 EXIT DU 
(4) 025056 000167 «WORD J$JMP 
(3) 025060 900000 «WORD 1L10015-2-. 


7005 -EVEN 
7006 


7007 025062 ~ ENDDU 


2 10015: 
025062 104453 TRAP 


C$DU 





CVCLHB DPV-11 DATA gt de TEST 


CVCLHB.P11 


025064 
025064 


025064 
025064 
025066 


15=JUN-81 


000167 
000000 


025070 . 


025070 
025070 


~~ 


52 


MACY11 age 3 5 30 


ADD 


UNIT SECTI 


C 
16=JUN=81 


-SBTTL ADD UNIT SECTION 


ed 


9 
10:00 PAGE 12-84 


> THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 


TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 


TO THE TEST CYCLE. 


BGNAU 


EXIT 


-EVEN 
ENDAU 


AU 


L$AU:: 
WORD 
. WORD 
L10016: 
TRAP 


SEQ 0106 


JSJMP 
L10016=2-. 


C$AU 


9 
CVCLHB DPV-11 DATA om LINK TEST MACY7! 30A(1052) 16=JUN-81 10: F — 12-85 SEQ 0107 
CVCLHB.P11 15=JUN=81 15:48 TEST 1: SETUP AND MODES OF OPERATI 


oe .SBTTL TEST 1: SETUP AND MODES OF OPERATION 

7050 

7051 so 

7052 ; TEST TO DETECT FAULTS IN THE DATA COMMUNICATION LINK. THIS TFST WILL 

7053 ; THE PROVIDE COVERAGE NECESSARY TO ISOLATE FAILURES TO THE COMPUTER 

ee : EQUIPMENT, THE COMMUNICATION LINK, OR THE MODEM. 

7056 

7063 

7069 

7070 025072 BGNTST 

(3) 025072 T1:: 

7071 

7077 

aka | .SBTTL PROGRAM SETUP SECTION 

ais 025072 013777 006624 161514 MOV CLKEN,@CLKCSR ;ENABLE THE CLOCK 

7082 025100 GTXRXB: 

7083 025100 005001 GTRA2: CLR R1 

7084 025102 012737 000001 006634 MOV #1,TIMER1 ;SET TIMER TO COUNT 7 TICK 

7085 025110 0605737 006634 i$: TST TIMER1 ;CHECK FOR IT TO BE COUNTED OFF 

7086 025114 001412 BEQ GTRA3 ‘BRANCH IF CLOCK EXISTS (COUNTED A TICK) 

7087 025116 005301 DEC R1 

7088 025120 001373 BNE °1$ sKEEP CHECKING UNTIL R1 DOES FULL COUNTDWN 
7089 025122 PRINTF #NOCLK :PRINT BAD CLK MSG AND WARN OF HANG IF TIMEOUT 
(7) 025122 012746 013736 © MOV #NOCLK ,-(SP) 
(6) 025126 012746 000001 MOV #1 /~(SP) 
(3) 025132 010600 MOV SP.R 
(4) 025134 104417 ; TRAP CSPNTF 
. baad 025136 062706 000004 ADD #4 SP 

7091 025142 905737 006560 GTRA3: TST RESFLG ;SEE IF HERE AFTER A RESTART. 

ae 025146 001112 BNE GTRAS ;BR IF HERE CAUSE OF A RESTART 

Ase : CLEAR COUNTS AND SET UP DEFAULTS 

7096 025150 005037 006524 GTRAS: CLR TOTCC ;CLEAR TOTAL CHAR. COUNT TEMP. LOC. 

7097 025154 005037 006460 CLR TTOTCC : CLEAR TOTAL CHAR. COUNT FOR TX BUFF 

7098 025160 005037 006444 CLR cCTOTCC CLEAR TOTAL CHAR. COUNT FOR CMP BUFF 

7099 025164 012701 006144 MOV #PTRTAB,R1 : INIT TRANSMIT MESSAGE POINTER 

7100 025770 010137 006436 MOV R1,TXPTR 

ay 4 025174 005037 006434 CLR RXPTR ; ZERO RX POINTER 

46, 025200 012737 006240 006440 MOV #PTR13,CMPPTR ;INIT COMPARE MESSAGE POINTER 

7105 025206 012737 000005 006512 MOV #5 .MSGTYP ;SET UP DEFAULT MSG TYPE (QUICK FOX - ITEP MSG) 
7106 025214 013737 002162 006514 MOV MSG5C,CURCC ;SET UP DEFAULT CHAR COUNT 

7107 025222 012737 003144 006462 MOV #TXBUF,TCURAD ;SET UP CURRENT ADD TO START OF TX BUFFER 
Ay 025230 012737 005144 006446 MOV ACMPBUF , CCURAD SET UP CURRENT ADD TO START OF CMP BUFFER 
7110 025236 013737 006462 006522 MOV TCURAD,CURADD ;SETUP CURRENT ADDR TO START OF TXBUF 

7111 025244 013737 006436 006520 MOV TXPTR,CPIR :SETUP CURRENT POINTER TABLE POINTER FOR TXBUF 
7112 025252 004737 022234 JSR PC ,BLDBUF : GO BUILD POINTER TABLE AND BUFFER 


7113 025256 012737 000001 006456 MOV #1, TXMTOT ;BUMP TOTAL MESSAGE COUNT 





_- . 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 hace 4 16=JUN-81 10:00 PAGE 12-86 SEQ 0108 


CVCLHB.P11 15-JUN=81 15:48 ROGRAM SETUP SECTION 

7114 

7115 025264 013737 006440 006520 MOV CMPPTR,CPTR 3;SET UP START OF COMPARE POINTER TABLE 

7116 025272 013737 006446 006522 MOV CCURAD,CURADD :SET UP CURRENT ADDR. TO START OF CMPBUF 

7117 025300 012737 000005 006512 MOV #5 ,MSGTYP 

7118 025306 013737 002162 006514 MOV MSG5SC,, CURCC 

7119 025314 004737 022234 JSR PC ,BLDBUF ;PUT DEFAULT MESSAGE INTO CMPBUF 

7120 025320 012737 000001 006442 MOV #1,CMPTOT ;BUMP THE COMP MESG COUNT 

7121 025326 012737 000003 006562 MOV #ACT MODTYP 3SET DEFAULT MODE= ACTIVE 

7122 025334 005037 006564 CLR MLTYP 3SET DEFAULT MAINTENANCE LOOP MODE =NONE 

7123 025340 012737 000001 006572 MOV #1,RPASS SET UP DEFAULT ‘RUN PASS'' COUNT TO 1 

7124 025346 012737 000002 006570 MOV #2,PARAM SET UP PROG. PARAMETERS - DATACHECKING ENABLED 

7125 ; OPERATOR STATUS MSGS. PRINT OFF 

7126 025354 PRINTF #HLPO 
(7) 025354 01 oe 012163 MOV #HLPO,-(SP) 
(6) 025360 012746 000001 MOV #1 ,~-(SP) 
(3) 025364 0106 SP,RO 
(4) 025 104417 TRAP CSPNTF 
(4) 025370 062706 000004 ADD #4,SP 

7127 025374 013737 006562 007676 GTRAS: MOV MODTYP,DEV1 

7128 025402 013737 006564 007700 MOV MLTYP,DEV2 

7129 025410 013737 006572 007702 MOV RPASS ,DEV3 

7130 025416 013737 006570 007704 MOV PARAM ,DEV4 

ar 025424 004737 022564 JSR PC ,SHWOP ;PRINT TO OPERATOR THE CURRENT MODE...... 

7133 025430 MANUAL SEE IF MANUAL INTERVENTION ALLOWED 
(3) 025430 104450 TRAP CSMANI 

7134 025432 BCOMPLETE GETCL ; BR IF YES (UAM=0 AND NOT CHAINED) 
(2) 025432 103412 BCS GETCL 

7135 025434 005737 006572 TST RPASS :SEE IF THIS IS FIRST ‘DCLT PASS’ 

7136 025440 001002 BNE 1$ ; BR IF NOT COMPLETED 1 PASS 

7137 025442 EXIT TST : IF DONE 1 PASS IN UNATTENDED MODE - EXIT 
(3) 025442 104432 ; TRAP CSEXIT 
(3) 025444 007676 -WORD 1L10017-. 

7138 025446 012737 000001 006564 1$: MOV ATTL,MLTYP sSET UP DEFAULT FOR UNATTENDED MODE 

ad 44 025454 000137 030432 JMP GTR9 : 'R M=ACT/LO=1/PAS=1/NOST/CH'’ AND RUN 

452 | - SBTTL COMMAND LINE FETCH & INTERPRETATION SECTION 

7143 025460 105037 003143 GETCL: CLRB P$GDBD ;CLEAR CMD LINE PARSING ERROR FLAGS 

7144 025464 105037 003142 ~ CLRB P$NNUF 

7145 025470 GMANID -CLISPM,CMDBUF .A,0,1,72..NO :GET A COMMAND LINE FROM OPR. 
(3) 025470 104443 TRAP CSGMAN 
(3) 025472 000406 BR 10000$ 
(4) 025474 -WORD CMDBUF 
(5) 025476 900142 -WORD TSCODE 
(5) 025500 011540 -WORD CLISPM 
(5) 025502 000000 -WORD 0 
(5) 025504 000001 -WORD TS$LOLIM 
(5) 025506 000110 «WORD TS$HILIM 
(3) 025510 10000$ 

7146 025510 012737 002666 003126 MOV #CMDBUF , P$BUF A 

7147 025516 012737 007706 003130 MOV #CLITRE ,P$TREE 

7148 025524 012737 026434 003132 MOV ry P$ACT 

7149 025532 005037 003012 CLR QUALF ;CLEAR QUALIFIER FLAG LOCATION 

7150 025536 004737 023066 JSR PC, PsiRv AR 


3GO PARSE COMMAND L 
7151 025542 105737 003143 TSTB P$GDB SEE IF PARSED OK OR AN ERROR 
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MACY11 30A(1052) 16=JUN=81 10:00 PAGE 12-87 SEQ 0109 
COMMAND 


| 
| _GYCLHB DPV-11 DATA COMM, LINK TEST 
| 


VCLHB.P11 15=JUN-81 15:48 LINE FETCH & INTERPRETATION SECTION 

7152 025546 001412 BEQ 1$ 

7153 025550 PRINTF #CLIERM 
(7) 025550 012746 011553 MOV ACLIERM,-(SP) 
(6) 025554 012746 000001 MOV #1,-(SP) 
(3) 025560 010600 V SP RO 
(4) 025562 104417 TRAP CSPNTF 
(4) 025564 062706 000004 ADD #4 ,SP 

7154 025570 137 025460 JMP GETCL 

7155 025574 105737 003142 1$: TSTB P$NNUF SEE IF INCOMPLETE COMMAND TYPED 

7156 025600 001412 BEQ 10$ 

7157 025602 PRINTF #CLINUF 
(7) 025602 012746 011603 MOV ACL INUF ,-(SP) 
(6) 025606 012746 000001 MOV #1 ,-(SP) 
(3) 025612 010600 MOV SP,RO 
(4) 025614 104417 TRAP CSPNTF 
(4) 025616 062706 000004 ADD #4,SP 

pes 025622 000137 025460 JMP GETCL 

7160 025626 023727 003010 000060 10$: CMP KEYWD1 ,#SETET 7WAS''SET EXPECT=TRANSMIT’’ TYPED ? REVB EC 

7161 025634 1711 BEQ GETCL :YES,BRANCH REV B EC 

7162 025636 023727 003010 000005 CMP KEYWD1 ,#HLP 7SEE IF HELP WAS TYPED 

7163 025644 V7 BEQ GETCL :GO GET CMD AGAIN IF YES 

7164 025646 023727 003010 000055 CMP KEYWD1 , #PRNT ;SEE IF PRINT WAS TYPED 

7165 025654 1701 BEQ GETCL ; GO GET CMD AGAIN IF YES 

7166 025656 023727 003010 000004 CMP KEYWD1 ,#RUN 7SEE IF RUN WAS TYPED 

7167 025664 1002 BNE 11$ ; BR IF NO 

7168 5666 137 030432 JMP GTR9 ; START EXEC. IF YES 

7169 025672 023727 003010 000052 11$: CMP KEYWD1,4#DMPS SEE IF DUMP WAS TYPED 

7170 025700 001 BNE 12$ : BR IF NO 

7171 025702 004737 022000 JSR PC, DUMPSR ; ELSE, DUMP PART OF MEMORY 

7172 025706 000137 025460 JMP GETCL 3 THEN RETURN TO GET ANOTHER CMD. 

7173 025712 023727 003010 000057 12$: CMP KEYWD1 ,#EXIT EXIT ? REV B EC 

7174 025720 001005 BNE ;NO,BRANCH REV B EC 

7175 025722 012737 000001 006556 MOV #1 ,DCLFLG ZSET CLEANUP FLAG REV B EC 

7176 5730 EXIT TST :GO BACK TO INIT REV B e 
(3) 025730 104432 TRAP CSEXIT 

mt? 025732 007410 -WORD 110017-. 

7178 025734 023727 003010 000001 13$: C KEYWD1,#CLEAR ;SEE IF CLEAR WAS TYPED 

7179 +=025742 1646 BEQ GETCL ;_IF YES, BACK TO GET ANOTHER CMD. 

7180 025744 023727 003010 000002 CMP KE YWD1 ,#SHOW SEE IF SHOW WAS TYPED 

7181 025752 00164 BEQ GETCL ;_IF YES, BACK TO GET ANOTHER CMD. 

7182 025754 023727 003010 000010 4$: CMP KEYWD1 ,#SETEXP ;SEE IF SET EXPECTED 

7183 025762 1512 BEQ 2$ ; BR IF YES (A SETEXP WAS TYPED) 

7184 025764 013737 006460 006524 5$: MOV TTOTCC, TOTCC 

7185 025772 023727 006524 001000 CMP TOTCC ,ABUFLIM ;SEE IF BUFFER ALREADY FULL 

7186 026000 002414 BLT 15$ ; BR IF NOT FULL (BUFLIM # OF CHARS.) 
7187 026002 PRINTF #MSGTRN,#BUFEX ; ELSE TELL OPR. AND DON'T BUILD MSG. 
(8) 026002 012746 014057 MOV MBUFEX,-(SP) 
(7) 026006 012746 014075 MOV #MSGTRN,-(SP) 
(6) 026012 012746 0 2 MOV #2,-(SP 
(3) 026016 010600 MOV SP RO 
(4) 026020 104417 TRAP C 
(4) 026022 062706 ADD #6,SP 
188 026026 000137 025460 JMP GETCL ; THEN GO GET A NEW COMMAND 

7189 026032 005737 006460 15$: TST TTOTCC zIF FIRST ‘‘SET’* THEN GET RID OF DEFAULT 
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CVCLHB.P11 15=JUN=81 15:48 COMMAND LINE FETCH & INTERPRETATION SECTION 

7190 026036 001002 BNE 6$ 

7191 026040 005037 006456 CLR TXMTOT 

7192 026044 012737 006144 006436 68: MOV #PTRTAB,TXPTR 3;GET POSITION OF END OF TX LIST 

7193 026052 013701 006456 MOV TXMTOT,R1 

7194 026056 020127 000017 CMP R1,AMSGLIM SEE IF MSG COUNT EXCEEDED. 

7195 026062 002414 BLT 17$ : BR_IF NO 

7196 026064 PRINTF #MSGTRN,#TABEX ; ELSE TELL OPR. AND DON'T BUILD MSG. 

(8) 026064 012746 014017 MOV A#TABEX ,=(SP) 
(7) 026070 012746 014075 MOV #MSGTRN, = (SP) 
(6) 026074 012746 000002 MOV #2,-(SP) 
(3) 026100 010600 MOV SP,RO 
(4) 026102 104417 TRAP CSPNTF 
(4) 026104 062706 000006 ADD #6,SP 

7197 026110 000137 025460 JMP .GETCL .. THEN GO GET 4 NEW COMMAND . 

7198 026114 006301 17$: ASL R1 # OF MSGS *4 = NEAT FREE PTR BLOCK 

7199 026116 006301 ASL R1 

7200 026120 060137 006436 ADD R1,TXPTR 

7201 026124 013737 006436 006520 MOV TXPTR,CPTR ;SETUP CHAR. COUNT, CURRENT ADDR, & PTR 

7202 026132 013737 006462 006522 MOV TCURAD , CURADD 

7203 026140 004737 022136 JSR PC ,ADDCC ;ADD_IN CHAR. COUNT AND CHECK TOTAL 

7204 026144 004737 022234 JSR PC ,BLDBUF 3GO BUILD MESSAGE IN BUFFER AND PTRS. 

7205 026150 013737 006520 006436 MOV CPTR,TXPTR 

7206 026156 013737 006524 006460 MOV TOTCC, TTOTCC UPDATE CHAR. COUNT, CURR ADDR, & PTR 

7207 026164 013737 006522 006462 MOV CURADD , TCURAD 

7208 026172 005237 006456 INC TXMTOT 

7209 026176 005337 003014 DEC QUAL VL DEC THE COPY COUNT 

7210 026202 001270 BNE 5$ 

cap 026204 000137 025460 JMP GETCL 

7213 026210 013737 006444 006524 2$: MOV cTOTCC, TOTCC SETUP CHAR. COUNT, CURR. ADDR. & PTR 

7214 026216 023727 006524 001000 CMP TOTCC,ABUFLIM SEE IF BUFFER ALREADY FULL 

7215 026224 002414 BLT 16$ ; BR_IF NOT FULL (BUFLIM # OF CHARS.) 

7216 026226 PRINTF #MSGTRN,ABUFEX ; ELSE TELL OPR. AND DON'T BUILD MSG. 
(8) 026226 012746 014057 MOV #BUFEX ,-(SP) 
(7) 026232 012746 014075 MOV #MSGTRN,~(SP) 
(6) 026236 012746 000002 MOV #2,-(SP) 
(3) 026242 010600 MOV SP RO 
(4) 026244 104417 TRAP CSPNTF 
(4) 026246 062706 000006 ADD #6,SP 

7217 026252 000137 025460 JMP GETCL ; THEN GO GET A NEW COMMAND 

7218 026256 005737 006444 16$: TST cTOTCC 71F FIRST ‘‘SET'’ THEN GET RID OF DEFAULT 

7219 026262 001002 BNE 7$ 

7220 026264 005037 006442 CLR CMPTOT 

7221 026270 7$: 

7222 026270 012737 006240 006440 MOV #PTR13,CMPPTR ; INIT COMPARE MESSAGE POINTER 

7223 026276 013701 006442 MOV CMPTOT,R1 

7224 026302 020127 000017 -. CMP R1,AMSGLIM SEE IF MSG COUNT EXCEEDED. 

7225 026306 002414 BLT 18$ : F 

7226 026310 PRINTF #MSGTRN,#TABEX ; ELSE TELL OPR. AND DON'T BUILD MSG. 
(8) 026310 012746 014017 MOV #TABEX ,-(SP) 
(7) 026314 012746 014075 MOV #MSGTRN,~(SP) 
(6) 026320 012746 000002 MOV #2,-(SP) 
(3) 026324 010600 MOV SP,RO 
(4) 026326 .104417 TRAP CSPNTF 
(4) 026330 062706 000006 ADD #6,SP 


7227 026334 000137 025460 JMP GETCL ; THEN GO GET A NEW COMMAND. 
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| CVCLHB DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-89 SEQ 0111 
CVCLHB.P11 15=JUN-81 15:48 COMMAND LINE FETCH & INTERPRETATION SECTION 


7228 026340 006301 18$: ASL R1 7 OF MSGS *4 = NEXT FREE PTR BLOCK 
7229 026342 006301 ASL R1 

7230 026344 060137 006440 ADD R1,CMPPTR 

7231 026350 013737 006440 006520 MOV CMPPTR,CPTR 

7232 026356 013737 006446 006522 MOV CCUR4D , CURADD 

7233 026364 004737 022136 JSR PC ,ADDCC ;ADD IN XHAR. COUNT AND CHECK TOTAL 
7234 026370 004737 022234 JSR PC ,BLDBUF 

7235 026374 013737 006520 006440 MOV CPTR,CMPPTR 

7236 026402 005237 006442 INC CMPTOT 

7237 026406 013737 006522 006446 MOV CURADD , CCURAD ;UPDATE CHAR. COUNT, CURR ADDRR. & PTR 
7238 026414 013737 006524 006444 MOV TOTCC,CTOTCC 

7239 026422 005337 003014 DEC QUAL VL :1F COPY WAS GIVEN, PUT MSG IN BUFF 
7240 026426 001270 BNE 2$ ; 


: IN 
7241 026430 000137 025460 JMP GETCL GO BACK UNTIL GET A *'RUN’’ 





| 


Ss. 
CVCLHB DPV-11 DATA °OMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 12-90 SEQ 0112 


| CVCLHB.P11 15=JUN=81 15:48 COMMAND LINE FETCH & INTERPRETATION SECTION 
7248 
7249 . SBTTL ACTION TABLE AND ROUTINES 
7250 ; USER MUST CLEAR/SET P$GDBD IF USE ‘‘CLIBIF’’ IN CONNECTION WITH ACTION 
7251 : R2 WILL HOLD ACTION CODE FROM PARSING (CLI) NODE 
7252 026434 CLIACT: 
7253 026434 006302 ASL R2 sMULTIPLY ACTION CODE BY 2 
7254 026436 016202 026452 MOV phy aig 1h R2 OFFSET VALUE 
7255 026442 062702 026452 ADD #10$,R2 ;ADD BASE VALUE 
004712 JSR PC, (R2) :GO_ DO ACTION 
RTS PC RETURN TO TRVACT: 
;BRIEF DESCRIPTION OF ACTONS TAKEN 
-WORD ACTNUL~10$ :NULL 
«WORD ACTCLR-10$ : CLEAR 
-WORD ACTSHO-10$ ; SHOW 
-WORD ACTCHK-10$ ; CHECK 
«WORD ACTRUN-10$ ; RUN 
-WORD ACTHLP-10$ HELP 
-WORD ACTCSE-10$ ;CLEAR OR SHOW EXPECT 
«WORD ACTCST-10$ ;CLEAR OR SHOW TRANSMIT 
-WORD ACTSTE-10$ SET EXPECT 
-WORD ACTSTT-10$ ;SET TRANSMIT 
WORD ACTSZE-10$ :SIZE 
«WORD ACTCOP-10$ ; COPY 
«WORD ACTNUM-10$ NUMERIC VALUE FOR SIZE OR COPY 
-WORD ACTOPM-10$ ;QUOTED MESSAGE FROM USER 
«WORD ACTSTS-10$ STATUS 
-WORD ACTEQO-10$ END OF QUOTED MESSAGE FROM USER 
ACTMSO-10$ ONES AS DATA 
«WORD ACTMS1-10$ :ZEROS AS DATA 
D ACTMS2-10$ 7: 1ALT AS DATA 
WORD ACTMS3~-10$ ;OACT AS DATA 
WORD ACTMS4-10$ ITEP_AS DATA 
WORD ACTMS5-10$ CCITT AS DATA 
-WORD ACTMS6~-10$ ;ALPHA_AS DATA 
WORD . ACTATV-10$ sACTIVE MODE 
«WORD ACTPAS-10$ sPASSIVE MODE 
-WORD ACTREC-10$ RECEIVE MODE 
-WORD ACTLIS-10$ sLISTEN MODE 
WORD ACTDLL-10$ [DOWNLINE LOAD 
WORD ACTTRA-10$ ; TRANSMIT MODE 
-WORD ACTTAL~10$ TALK MODE 
-WORD ACTNO-10$ zNO _ IE /NOCHECK 
WORD ACTECH-10$ ECHO 
«WORD ACTCRC-10$ 2 CRC 
-WORD ACTPRO-10$ PROTOCOL 
-WORD ACTRPS-10$ STATUS 
-WORD ACTMOP-10$ ;SATELLITE IN MAINTENANCE LOOP MODE 
-WORD ACTILP-10$ 3 INTERNALTTL 
-WORD ACTCLP-10$ ;CABLE LOOP 
-WORD ACTLLP-10$ ;LOCAL MODEM LOOP 
-WORD ACTRLP-10$ REMOTE MODEM LOOP 
-WORD ACTNUF~10$ :MORE COMMAND NEEDED 
-WORD ACTBCR-10$ [BAD CHARACTER IN OPERATOR MESSAGE 
«WORD ACTDMS-10$ ;DUMP MEMORY START ADDRESS 


-WORD ACTDME-10$ ;DUMP MEMORY END ADDRESS 





Seite. BAY, See I Re ET ie, Tey was ce 
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CVCLHB DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) 16-JUN-81" 10:00 PAGE 12-91 SEQ 0113 
CVCLHB.P11 15=JUN-81 15:48 ACTION TABLE AND ROUTINES 

7304 026602 000700 «WORD ACTDMQ=-10$ ; DUMP _WORD 

7305 026604 000246 «WORD ACTPRT-10$ 3PRINT 

7306 026606 001572 -WORD ACTMOS-10$ sMODEM STATUS 

7307 026610 000236 «WORD ACTEXT-10$ EXIT ROUTINE REV B EC 

7308 026612 001272 -WORD ACTSEX-10$ SET EX=TR REV B EC 


a rr 


CVCLHB DPV-11 DATA COMM. LINK 
CVCLHB.P11 


026614 
026622 


026710 
026716 


026720 


026726 
026732 


027052 
027056 
027062 


027066 
027074 


15=JUN-81 


112737 
000207 
012737 
000207 
012737 
000207 


012702 
012246 


012737 
000207 
012737 
004737 
000207 
012737 
112737 
012737 
000207 
012737 
013701 
013702 


15:48 

177777 
000001 
000002 
003016 
012241 
000002 
000006 
003036 
000005 


000057 
000055 
020302 
000004 
177777 
000001 


006240 
006440 


42 
003142 
0 


TEST 


003142 
003010 


003010 


003010 
003010 
003010 
003010 
003142 
006572 


006440 


000002 
006442 


006440 
006520 


000002 


MACY11 wry hh ae 


AC TNUF : 
ACTNUL: 


MOVB 
RTS 


ACTCLR: MOV 


ACTSHO: 


ACTHLP: MOV 
1$: 


ACTEXT: 


ACTPRT: 


ACTRUN: 


ACTCSE: 


ACTCST: 


RTS 


MOV 
RTS 


PRINTF 


16-yuN=81" 
ON TABLE AND ROUTIN 


#-1, PSNNUF 

PC 
#CLEAR,KEYWD1 
pC 
#SHOW.KEYWD1 
PC 


#HLPTAB ,R2 
MHLPF ,(R2)+ 


aaa 
MHLP,KEYWD1 
PC 


MEXIT .KEYWD1 
PC 


#PRNT ,KEYWD1 
ating 


#RUN,KEYWD1 
#~1 , PSNNUF 
#1,RPASS 

PC 


#PTR13,CMPPTR 
CMPPTR ,R1 
ah Ca 
KEYWD1 ,#SHOW 
ACTSHW 
#1,CMPTOT 
cTOTCC 
#PTR13,CMPPTR 
CMPPTR,CPTR 
#CMPBUF ,R1 
R1,CCURAD 
ACTCLB 


#PTRTAB,R1 
TXMTOT ,R2 
PS$NNUF 


KEYWD1 , #SHOW 
ACTSHW 


9 
i 90 PAGE 12-92 


;SET FLAG TO SAY NEED MORE OF COMMAND 
;RETURN TO PARSER 


;SET LOC TO SAY A CLEAR WAS TYPED 


;SET LOC. TO SAY A SHOW WAS TYPED 


;SETUP R2 AS A POINTER TO HELP MSG TABLE 
PRINT HELP INFORMATION MESSAGES 


MOV (R2)+,=(SP) 
MOV MHLPF ,-(SP) 
MOV #2,-(SP) 
MOV SP,RO 

TRAP CSPNTF 

DD #6,SP 


:SEE IF ALL INFO PRINTED YET 
7 1F NO KEEP PRINTING 
;SET LOC. TO SAY A HELP WAS TYPED 


EXIT COMMAND WAS INPUT REV B EC 
RETURN 


;SET LOC. TO SAY A HELP WAS TYPED 
;CALL ROUTINE TO PRINT EVENT LOG AND BASE TABLE 


;SET RUN FLAG 
zSET FLAG TO SAY NEED MORE OF COMMAND 
[SET DEFAULT RUN ‘PASS'' TO 1 


INIT COMPARE MESSAGE POINTER 


BR IF 
[CLEAR COMPARE 


FLAG THAT HAVE VALID ye AT THIS PT. 
:SEE IF P CLEAR OR SHOW WAS TYPED 

A SHOW WAS TYPED 
MESSAGE COUNT, CHAR. COUNT 


; AND RESET POINTER 


INIT COMPARE MESSAGE POINTER 
;SET UP TO FILL IN DEFAULT MESSAGE 





FLAG THAT. HAVE VALID COMMAND AT THIS PT. 


iSEE IF A CLEAR OR SHOW WAS TYPED 


A SHOW WAS TYPED 


SEQ 0114 
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CVCLHB.P11 15=JUN=81 15:48 ON TABLE AND ROUTINES 


7361 027076 012737 000001 006456 MOV #1, TXMTOT CLEAR TRANSMIT MESSAGE COUNT, CHAR. COUNT 
7362 027104 005037 006460 CLR TTOTCC ; AND RESET POINTER 

7363 027110 012737 006144 006436 MOV #PTRTAB, TXPTR 

7364 027116 013737 006436 006520 MOV TXPTR,CPTR 

7365 027124 012701 003144 MOV #TXBUF ,R1 

r308 010137 006462 MOV R1, TCURAD 

7368 027134 012702 001000 ACTCLB: MOV MBUFLIM,R2 

7369 027140 010137 006522 MOV R1,CURADD ;SET UP TO PUT DEFAULT MSG IN LIST AFTER 033'S 


027144 012737 000005 0065 


7370 #5 ,MSGTYP 
7371 027152 013737 002162 0065 


MOV MSGSC , CURCC 


—b ad 
#n 
3 
< 


7372 027160 105021 1$: CLRB (R1)+ ore EXPT OR TRAN BUFFER WITH O'S IF A CLEAR 

7373 027162 005302 DEC R2 “BUFLIM’’ NUMBER OF BYTE LOCATIONS 

7374 027164 001375 BNE 1$ 

7375 027166 004737 022234 JSR PC ,BLDBUF 7"‘CLEAR'' REALLY MEANS TO PUT DEFAULT MSG IN 

Lela 027172 000207 RTS PC [WHEN DONE, RETURN TO PARSER 

7378 

7379 027174 012705 003066 ACTSHW: MOV #SHTAB RS 

7380 027200 122571 000000 5$: CMPB (R5)+,a(R1) ;LOOK AT FIRST BYTE OF MSG TO DECIPHER TYPE 

7381 027204 001404 BEQ 6$ 

027206 020527 003075 CMP R5 ,ASHTEND SEE IF LOOKED AT ALL OF DEFAULTS YET 

7383 027212 001372 BNE 5$ 

7384 027214 005205 INC R5 MUST BE OPR. SPEC'D THEN 

7385 027216 162705 003067 6$: SUB #SHTAB+1 ,R5 

7386 027222 006305 ASL R5 

7387 027224 016137 000002 006530 MOV 2(R1), TEMP 

7388 027232 ; PRINTF #SHMSG,SHTYTB(R5), TEMP ;PRINT MSG SIZE & TYPE 

(9) 027232 013746 006530 MOV TEMP ,~( 
(8) 027236 016546 003046 ; MOV SHTVIB(RS) -(SP) 
(7) 027242 012746 013232 MOV #SHMSG ,~ (SP) 
(6) 027246 012746 000003 MOV #3,~-(SP) 
(3) 027252 MOV PR 
(4) 254 104417 TRAP CSPNIF 
(4) 027256 062706 000010 Abv #10,SP 

7389 027262 062701 000004 ADD #4,R1 ;BUMP R1 TO NEXT SET OF POINTERS 

7390 027266 005302 DEC R2 

7391 027270 001341 BNE ACTSHW 

7392 027272 013737 006562 007676 MOV MODTYP ,DEV1 

7393 027300 013737 006564 007700 MOV MLTYP,DEV2 

7394 027306 013737 006572 007702 MOV RPASS ,DEV3 

7395 027314 013737 006570 007704 MOV PARAM, DEV4 

7396 027322 004737 022564 JSR PC, SHWOP SHOW THE OPERATOR THE CURRENT MODE..... ALSO 

Lead 027326 000207 RTS PC 

7399 027330 013737 003136 006504 ACTDMS: MOV P$NUM, STADD SETUP STARTING ADDRESS FOR DUMP 

7400 027336 005037 006510 CLR BYTBIT SET DEFAULT OF WORD DUMP 

7401 027342 012737 000052 003010 MOV #DMPS ,KEYWD1 FLAG THAT A DUMP WAS TYPED 

Log 027350 000403 BR ACTDME 

404 027352 012737 177777 006510 ACTDMQ: MOV #~1 ,BYTBIT ;SET DUMP FLAG TO ‘DUMP-WORD’’ 

7405 027360 015737 003136 006506 ACTDME: MOV P$NUM, ENADD zSETUP END ADDRESS FOR DUMP (=START IF NO “TEE"* 

7406 027366 105037 003142 ACTDMX: CLRB P$NNUF CLEAR NOT~ENOUGH FLAG, ‘DUMP N-N/B’' IS VALID 


027372 000207 RTS PC 


CVCLHB DPV-11 DATA COMM, LINK 


CVCLHB.P11 


027374 
027402 


02 
027412 
027420 


Oo rtts 
027430 


027432 
027440 


027442 


027606 
027610 
027612 


027632 


15=JUN-81 15:48 


012737 
000403 
012737 
012737 
000207 
012737 
000207 
012737 
000207 
023727 

3 


012746 
012746 
010600 
icc 34 


062706 
112737 
000411 
013737 


000010 
000011 
000001 
000012 


000013 


003012 
003136 


012042 
000001 


000004 
177777 
003136 


003136 
003014 


011775 
000001 


000004 


TEST 


003010 


003010 
003014 


003012 
003012 


000012 


003143 
006514 
003014 


006512 


MACY11 eM ee 
ACTION TABLE AND ROUTINE 


ACTSTE: 


ACTSTT: 
ACTSTX: 


ACTSZE: MOV 


ACTCOP: 


ACTNUM: 


3$: 
1$: 
2s: 


ACTOPM: 


ACTEQO: 


1$: 


ACTBCR: 


BNE 
PRINTF 


PRINTF 


RTS 


16-JUN-81" 


MSETEXP,KEYWD1 
ACTSTX 


#MSETTRN,KEYWD1 


#1 ,QUALVL 
PC 


AMSIZE ,QUALFG 
PC 


#QCOPY ,QUALFG 
PC 


: atria, 
P$NUM 

3$ 

A#CLISEO 


#-1,P$GDBD 
oat CURCC 
P$NUM , QUAL VL 
QUAL VL 
ACTMEX 


#7 .MSGTYP 
R4, TEMP 
MP 


#OPBUF ,R5 
(R1)+,(R5)+ 
R2 


1$ 
ACTMEX 
ACLIBCR 


PC 


9 
in y PAGE 13 


;BAD CHAR. 


SET UP DEFAULT COPY TO 1 (/COPY=0) 


sSEE IF A SIZE 2 COPY TYPED 

:BR IF IT WAS A COPY 

: CHECK TO BE SURE DIDN'T TRY SIZE=0 
; BR IF NO 


MOV Ps pe - (SP) 
MOV #1,-(SP) 
MOV SP.RO 
TRAP CSPNTF 
ADD #4 ,SP 


;SEE ERROR-IN-CMD FLAG 
31F A SIZE LOAD CURCC WITH BYTE COUNT 


z1F A COPY, LOAD COPY COUNT 
: INCREMENT SO FIRST DEC MAKES IT REAL # 


KEEP TRACK OF START OF QUOTED TEXT 


SO CAN CALC OPCNT AT END OF QUOTES 


;CALC BYTE COUNT FOR QUOTED TEXT 


;COPY QUOTED TEXT TO OPBUF 


IN OPR. QUOTED STRING 
MOV #CLIBCR,-(SP) 
MOV #1,~(SP) 


MOV SP RO 
TRAP CSPNTF 
ADD #4 ,SP 


SEQ 0116 









N 9 
16=JUN=-81 10:00 PAGE 13-1 















CVCLHB DPV-11 DATA COMM, LiNK TEST MACY11 ehh ag SEQ 0117 
CVCLHB.P11 15=JUN-81 15:48 TION TABILE AND ROUTINES 
7456 
7457 027634 005037 006512 ACTMSO: CLR MSGTYP 
7458 027640 000435 BR ACTME1 
7459 027642 012737 000001 006512 ACTMS1: MOV #1 ,MSGTYP SET MESSAGE TYPE = ALL ONES 
7 027650 000431 BR ACTME1 
7461 027652 012737 000002 006512 ACTMS2: MOV ee MSGTYP SET MESSAGE TYPE = ONES & ZEROS 
7462 027660 000425 BR CTME1 
7463 027662 012737 000003 006512 ACTMS3: MOV a3, MSGTYP SET MESSAGE TYPE = ZEROS & ONES 
7464 027670 000421 BR ACTME1 
7465 027672 012737 000004 006512 ACTMS4: MOV #4 ,.MSGTYP SET MESSAGE TYPE = CCITT 
7466 027700 000415 BR ACTME 1 
7467 027702 012737 000005 006512 ACTMS5: MOV #5 ,MSGTYP SET MESS TYPE = QUICK FOX 
7468 027710 013737 002162 006514 MOV MSGoC . CURCC ;SETUP DEFAULT SIZE FOR THIS TYPE 
7469 027716 000430 BR ACTM 
7470 027720 012737 006512 ACTMS6: MOV #6, MSGTYP SET MESSAGE TYPE = ALPHA/NUM 
fa 027726 013737 002164 006514 MOV MSG6C, CURCC ZSETUP DEFAULT SIZE FOR THIS TYPE 
7473 027734 012737 000100 006514 ACTME1: MOV #64. ,CURCC SETUP DEFAULT SIZE FOR MSGO-4 
age 027742 000416 BR ACTMEX BRANCH TO EXIT 
7476 sREV B EC 
7477 027744 022737 000010 003010 ACTSEX: CMP MSETEXP ,KEYWD1 DID WE GET HERE FROM ''SET E="‘COMMAND? 
7478 027752 001404 BEQ -BRANCH 
7479 027754 112737 000001 003143 MOVB #1 ,P$GDBD ‘SE T ERROR FLAG 
7480 027762 000406 BR Ci MEX 7GO EXIT SUBROUTINE 
7481 027764 004737 022360 10$: JSR PC FACSIMILE 3;GO COPY TRANSMIT LIST TO eect LIST 
7482 027770 012737 0 003010 MOV MSETET.KEYWD1 SET _FLAG TO BE USED IN T1: 
a 027776 000400 BR ACTMEX EXIT SUBROUTINE 
7485 030000 105037 003142 ACTMEX: CLRB P$NNUF ;CLEAR NOT-ENOUGH FLAG 
030004 000207 RTS PC 
















CVCLHB.P11 


012737 
000432 
012737 
105037 
005037 
005037 
000417 
012737 
000413 
012737 
000407 
012737 
000403 
012737 
042737 
105037 


005037 
000207 


CVCLHB DPV-11 DATA COMM. LINK 
15=JUN-81 15:48 


000003 


TEST 


006562 


006562 


006562 


006562 


006562 


006562 
006570 


B 
MACY11 eit oe 16=JUN=81 


ACTATV: 


ACTPAS: 


ACTREC: 


ACTLIS: 


ACTDLL: 


ACTTRA: 


ACTTAL: 
ACTM2X: 


MOV 
BR 


ON TABLE AND ROUT! 
#ACT MODTYP 


ACTM2X 
#PAS MODTYP 
PSNNUF 


MLTYP 
PC 


MOD TYP 
ACTM2X 


reg MOD TYP 


CTM2X 


#D0W,MODTYP 
AC TM2x 


TRA MOD TYP 


ACTM2x 
#TAL ,MODTYP 


#E CHOB , PARAM 
P$NNUF 

MLTYP 

PC 


10 
hee PAGE 13-2 SEQ 0118 


s;MODE = ACTIVE 


;MODE = PASSIVE 
;CLEAR NOT-ENOUGH FLAG 
;CLEAR MAINT LOOP TYPE 


s;MODE = RECEIVE 
MODE = LISTEN 
sMODE = DOWNLINE LOAD 


;MODE = TRANSMIT 


sMODE = TALK 
SAE ECHO — >: PASSIVE MODE) 
NOT=ENOUGH FLAG 


CLEAR 
[CLEAR MAINT LOOP TYPE 


C 10 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 eh 16-JUN-81 10:00 PAGE 13-3 SEQ 0119 


CVCLHB.P11 —-15=JUN-81 15:48 ON TABLE AND ROUTINES 

7517 030122 012737 000036 003012 ACTNO: MOV — #NO, QUALFG 

7518 030150 000207 RTS PC 

7520 030132 022737 000036 003012 ACTECH: (MP  — #NO,QUALFG 

7521 030140 001422 BEQ «18 

7522 030142 052737 000004 006570 BIS #ECHOB, PARAM 

7523 030150 022737 000002 006562 CMP = #PAS ,MODTYP :BE SURE IN PASSIVE MODE IF 

7524 030156 001416 BEQ = SIF TRYING TO SET /ECHO 

7525 030160 PRINTF #CLINPS 

(7) 030160 012746 011732 MOV #CLINPS,-(SP) 
(6) 030164 012746 000001 MOV #1, -( SP5 
(3) 030170 010600 MOV —- SP_RO 
(4) 030172 104417 TRAP CSPNTF 
(4) 030174 062706 000004 ADD = #4, SP 
7526 030200 112737 177777 003143 MOVB —-#=1,PSGDBD 

7527 030206 042737 000004 006570 1$: BIC  — #ECHOB, PARAM 

7528 030214 005037 003012 2$: CLR QUALFG CLEAR ‘NO'’ OUT OF QUALIFIER FLAG 
7529 030220 000501 BR = ACTLXX 

7531 030222 012701 000002 ACTCHK: MOV #DATCKB,R1 SET DATA CHECK BIT 

7532 030226 000415 BR ACTOFG 

7534 030230 012701 000001 ACTSTS: MOV #STATB,R1 SET THE STATUS BIT 

7535 030284 000410 BR  —ACTOFG 

7537 030236 012701 000020 ACTCRC: MOV —- #CRCB,R1 ;SET THE CRC BIT 

7538 030242 000405 BR = ACTOFG 

7540 030244 012701 000010 _ACTMOS: MOV #MOCHK ,R1 ;SET THE MODEM BIT 

7541 030250 000402 36 ACTOFG 

55 030252 012701 000040 ACTPRO: MOV #PROTOB,R1 SET THE PROTOCOL BIT 

7545 030256 050137 006570 ACTOFG: BIS 1, PARAM 

7546 030262 022737 000036 003012 CMP —-#NO, QUALFG 

7547 030270 001002 BNE —-1$ 

7548 030272 040137 006570 BIC —R1, PARAM 

7549 030276 005037 003012 1$: CLR QUALFG :CLEAR "NO" OUT OF QUALIFIER FLAG 
7550 030302 000450 BR ——ACTLXX 

7552 030304 013737 003136 006572 ACTRPS: MOV — PSNUM,RPASS :GET NUMBER OF ‘RUN PASSES" 

7953 030512 000444 BR ACT LXK 

7555 030314 012737 000005 006564 ACTMOP: MOV = #5, MLTYP 

7556 030322 000417 BR  ——ACTLPX 

7557 030324 012737 000001 006564 ACTTLP: MOV #1, ,MLTYP 

7558 030332 000413 BR  —ACTLPX 

7559 030334 012737 000002 006564 ACTCLP: MOV #2, MLTYP 

7560 030342 000407 BR ACTLPX 

7561 030344 012737 000003 006564 ACTLLP: MOV #3, MLTYP 

7562 030352 000403 BR —ACTLPX 

7563 030354 012737 000004 006564 ACTRLP: MOV #4,ML TYP 

7565 030362 022737 000003 006562 ACTLPX: CMP ACT .MODT YP :BE SURE IN ACTIVE IF TRYING TO SET LOOP 
7566 030370 001415 BEQ = ACTLX : BR IF IN ACTIVE 


7567 030372 112737 177777 003143 MOVB #-1 ,P$GDBD 





D 10 
CVCLHB DPV=11 DATA COMM. LINK TEST MACY11 oy oe 16=JUN-81 10:00 PAGE 13-4 SEQ 0120 


CVCLHB.P11 15=JUN-81 15:48 TION TABLE AND ROUTINES 

7568 030400 005037 006564 CLR MLTY ;CLEAR ANY LOOP TYPE THAT MAY HAVE GOT SET 

7569 030404 PRINTF PEL IBDL 
(7) 030404 012746 011670 MOV gr ia 
‘6) 030410 012746 000001 MOV #1,-(SP) 
(3) 030414 010600 MOV SP._RO 
(4) 030416 104417 TRAP CSPNTF 
(4) 030420 062706 000004 ADD #4,SP 

7570 030424 105037 003142 ACTLXX: CLRB P$NNUF sCLEAR NOT=ENOUGH FLAG 

7571 030430 000207 RTS PC 





m— --- 


CVCLHB DPV-11 DATA COMM, LINK 


| 
| CVCLHG..P11 


030504 
7588 030512 
030520 


030526 


012746 
00 


012737 
012737 
012737 


013737 


004737 
004737 


15=JUN=81 15:48 


006564 
000002 
006442 


012073 
000001 


000004 
025460 


00 
011472 
000200 
000426 
017670 
032672 


TEST 


006570 
006456 


006436 
006440 
00643- 


006472 


MACY11 eet 


;REV B BY EC 
GTRI: 


GTREX: 


GTRX2: 


8 
PRINTF 


JMP 


3 RK wag CCDE 
MOV 


MOV 
MOV 


E 
16=JUN=81 


MLTYP 

10$ 

~~ PARAM 
TXMTOT 
reLIPw 


GETCL 


#PTR23,RXPTR 
CMPTOT ,RXMTOT 


NCNT 
#626, SYNCW 
ws] r?. DPVP1 
RNODE 


1$ 
#B1T7,DPVP1 
#426,SYNCW 
PC,.LOGDVI 
PC,DVINIT 


#BUF LIM, CURCC 
#RXBUF , CURADD 
RXPTR,CPTR 
#10,MSGTYP 

PC ,ABLDBUF 
MODTYP,R2 


R2 
@MODE (R2) 


10 
10:00 PAGE 13-5 
ON TABLE AND ROUTINES 


;LOOP MODE ? 

;NO,BRANCH 

sDATA CHECK ? 

;NO,BRANCH 

TX = cx ? 
YES ,BRANCH 

SPRINT WARNING 


; TRY AGAIN 


INIT TRANSMIT MESSAGE POINTER 
INIT COMPARE MESSAGE POINTER 
INIT RECEIVE MESSAGE POINTER 


MAKE COMPARE AND RX MESSAGE COUNTS EQUAL 


FLAG 

OPTIONAL VARIABLE COUNTER 
PASS COUNT 
ERROR COUNT 
GLITCH COUNT 

AR HARD ERR. COUNT 
LINE COUNTER 


CLEAR 
SET UP SYNCW FOR 226 SYNC +TSOM 
SET UP PARAM WORD FOR 226 RX SYNC 


a ITEP_GO TO 1 


:ELSE SET UP S 


FOR 
G ABOUT TO INIT DEVICE 


;LO 
INIT DEVICE 
sSey 


CHAR COUNT TO ‘BUFLIM’’ 


NO. OF BYTES 


:SET UP RX BUFFER AS CURRRENT ADD. 


SET UP FOR 33 TO FILL RX BUFFERS 
;CLEAR RX BUFFER 


sMODE DISPATCH 


SEQ 0121 


#CLIPW,=(SP) 
#1,-(SP) 
SP,RO 

CSPNTF 

#4 ,SP 





= RE Rg OE 
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| CVCLHB DPV=11_ DATA COMM, LINK TEST MACY11 30a(1052) 16=JUN-81 10:00 PAGE 13-6 SEQ 0122 
CVCLHB.P11 15=JUN“81 15:48 RECEIVE MODE SECTION 


| 
| ay - SBTTL RECEIVE MODE SECTION 
7622 rn “FUNCTIONAL DESCRIPTION: 
7623 $ RECEIVE=ONLY (OR ONE=WAY=IN) ROUTINE 
7626 é IN THIS MODE OF TESTING THE DEVICE'S yg bogs IS Stee i IN EXPECTATION 
| 7625 : OF RECEIVING A MESSAGE. AFTER RECEIVING ‘EXPE ER OF 
| 7626 ; MESSAGES, THE DATA RECEIVED CA BE COMPARED AGAINST. A LIST OF ‘EXPECT \ 
rest : TO RECEIVE'’ MESSAGES IF DATA=CHECKING IS ENABLED. : 
7629 : SUBORDINATE ROUTINES USED: 
7630 : ““ALLTR"’ 
7631 : 
7632 3 LI 2 SEQUENCE : 
oe : @MODE (R2) :DISPATCH TO MODE BASED ON MODE TYPE IN R2 
7635 
7636 030704 : RXONLY: 
7637 030704 013737 006434 006516 RXON2: MOV RXPTR,CPTRR 
7638 030712 013737 006472 006470 MOV RXMTOT,DVRCT sSET UP MESSAGE COUNT 
7639 020720 052737 ‘000104 006574 BIS WORK +MERK, FLAG ;SET UP _RX QUE 


7640 030726 005037 006520 CLR CPTR :CLEAR THE TX POINTER 
7641 030732 000137 031076 JMP ALLTR GO RX. 





CVCLHB DPv=11 DATA = LINK TEST 


CVCLHB.P11 


030736 


030766 
030772 


15=JUN=81 


042737 


5:48 


000002 
0064 36 
006456 
000210 
006516 
031074 


- SBTTL 


006570 TXONLY: 


O965¢0 TXON2: 


TRANSMIT MODE SECTION 
TRANSMIT MODE SECTION 


or 
: the oo: DESCRIPTION: 


G 10 
MACY11 30A(1052) 16=JUN=81 10:00 PAGE 13-7 


ANSMIT=ONLY (OR ONE=WAY=-OUT) ROUTINE 
IN THIS MODE OF TESTING A LIST OF MESSAGES IS TRANSMITTED WITHOUT 
EXPECTING ANY DATA TO BE RECEIVED. A REPETITION COUNT CAN BE 
SPECIFIED TO REPETITIVELY TRANSMIT THE LIST. 


* SUBORDINATE ROUTINES USED: 
‘ “"ALLTR’’ 


CALLING SEQUENCE : 
: JMP 


aMODE (R2) 


#DATCKB, PARAM 
TXPTR,CPTR 
TXMTOT ,DVTCT 
MQTX*METX, FLAG 
CPTRR 

ALLTR 


DISPATCH TO MODE BASED ON MODE TYPE IN R2 


SET NOCHECK 


;COPY COUNTER FOR THIS PASS 
3SET THE QUE TX FLAG 
3 ee RX POINTER 

M. 


SEQ 0123 


ts - —— - —--——-— _- —-—— 
| 
| 


H 10 
| CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN=81 10:00 PAGE 13-8 SEQ 0124 
CVCLHB.P11 15=JUN=81 15:48 PASSIVE MODE SECTION 


| 7667 . SBITL PASSIVE MODE SECTION 
, 7668 
7669 pee 
| 7670 ; FUNCTIONAL DESCRIPTION: 
7671 ; PASSIVE MODE SECTION 
7672 Z IN THIS MODE OF TESTING, THE DEVICE'S RECEIVER IS ENABLED IN 
7673 ; EXPECTATION OF RECEIVING A MESSAGE. THEN EVERY TIME A MESSAGE IS 
7674 ; RECEIVED, A MESSAGE IS TRANSMITTED. DATA CHECKING CAN BE DONE ON THE 
fe : RECEIVED DATA, 
7677 ; SUBORDINATE ROUTINES USED: 
7678 : 
7679 : “ALL TR"’ 
7680 s 
7681 : nS SEQUENCE : 
ey] ; @MODE (R2) zDISPATCH TO MODE BASED ON MODE TYPE IN R2 
7684 
7685 030776 PLCK: 
7686 020776 013737 006456 006454 PLC(K2: MOV TXMTOT ,DVTCT :SET UP THE TRANSMIT COUNT 
7687 031004 013737 006436 006529 MOV TXPTR,CPTR ;SET UP CPTR TO TRANSMIT POINTER 
7688 031012 012737 006434 006516 PLCK3: MOV RXPTR,CPTRR ;SET UP CPTRR TO REC POINTER 
7689 031020 052737 000104 006574 BIS MQORX+MERK,FLAG ;SET UP Q AND EXPECT RX 


7690 031026 000137 031074 JMP ALLTR ;AND GO RX FIRST MSG. 





I 10 
10 


| 
| CVCLHB _DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN=81 :00 PAGE 13-9 SEQ 0125 
| CVCLHB.P11 15=JUN=81 15:48 ACTIVE MODE SECTION 
| 7693 .SBITL ACTIVE MODE SECTION 
7694 
7695 pee 
7696 : FUNCTIONAL DESCRIPTION: 
7697 ; ACTIVE MODE SECTION 
74698 : IN THIS MODE OF TESTING A LIST OF MESSAGES IS TRANSMITTED AND 
7699 : MESSAGES ARE EXPECTED TO BE RECEIVED. RECEIVED DATA CAN BE COMPARED 
7700 : AGAINST ‘EXPECTED'' DATA IF DATA=CHECKING IS ENABLED. 
7701 : NOTE: IF BOTH ENDS OF THE LINK ARE IN ACTIVE MODE, THEN THE 
ha i LINK MUST BE A FULL DUPLEX LINK! 
AA: : SUBORDINATE ROUTINES USED: 
7706 : ““ALLTR'' 
7707 : 
7708 > CALLING SEQUENCE: 
4444 : JMP @MODE (R2) DISPATCH TO MODE BASED ON MODE TYPE IN R2 
7711 
7712 031032 013737 006456 006454 ALCK: MOV TXMTOT ,DVTCT 
7713 031040 013737 006436 006529 MOV TXPTR,CPTR SET UP TX COUNTS 
7714 031046 01%737 006472 006470 MOV RXMTOT,DVRCT SET uP COUNTS 
7715 031054 013737 006434 006516 MOV RXPTR, CPTRR 
7716 031062 052737 000314 006574 BIS MORK +MOTX OME TX*MERX FLAG 


7717, «031070 +=000137 031074 JMP ALLTR 
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 CVCLHB DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 13-10 SEQ 0126 
CVCLHB.P11 15=JUN-81 15:48 TRANSMIT = RECEIVE FOR ALL STANDARD MODES 
7722 .SBTTL TRANSMIT = RECEIVE FOR ALL STANDARD MODES 
7724 soe 
7725 : FUNCTIONAL DESCRIPTION: 
7726 : THIS CODE PERFORMS THE FOLLOWING FUNCTIONS 
7727 : IF RX BUFFERS ARE TO BE QUED,TELL DEVICE 
7728 : CODE TO QUE THEM +106 RECEIVE QUED. 
7729 : 2.) IF TX BUFFERS ARE TO BE QUED ,TELL DEVICE 
7730 : CODE TO QUE THEM, LOG TRANSMIT QUED. 
7731 : 3.) WAIT FOR EITHER RECIVE BUFFER OR TRANSMIT BUFFER OR 
7732 ; BOTH TO COMPLETE 
7733 : 4.) IF RECEIVE COMPLETE LOG IT UPDATE RX TABLE IF DATA 
773% : CHECKING. 
7735 : 5.) IF TRANSMIT COMPLETE LOG IT 
7736 : 6.) WHEN BOTH TRANSMIT ind RECIEVE LISTS ARE DONE 
ang ; GO TO THE COMPARE BUFFER CODE 
7739 ; SUBORDINATE ROUTINES U SED 
7740 : “DVR RO" QUE RECEIVE BUFFER SPACE TO DEVICE 
7741 : + LOGAXQ' LOG RECEIVE BUFFER SPACE TO EVENT LOG 
7742 : "LOGTXQ'=LOG TRANSMIT BUFFER QUED TO EVENT 0° 
7743 é “DVTXRX''-QUE TRANSMIT BUFFER AND WAIT FOR R 
7744 : OR TX TO COMPLETE 
7745 : “LOGRXC’=LOG RECEIVE BUFFER COMPLETED TO EVENT LOG 
7746 : “LOGTXC’=LOG TRANSMIT BUFFER COMPLETED TO EVENT LOG 
7748 3; USE OF FLAG BITS: 
7749 $ QRx = SET ON INPUT TO ALLTR IF REC IS TO BE QUED TO 
7750 : DEVICE. CLEARED BY DVRXQ AND THEN SET BY DVTXRX 
7751 : WHEN RX BUFFER IS COMPLETED. 
7752 : QTX = SET ON INPUT TO ALLTR IF TRANSMIT IS TO BE QUED TO 
7753 : DEVICE. CLEARED ON ENTRY TO DVTXRX AND SET BY DVTXRX 
7754 : WHEN TX BUFFER IS COMPLETED. 
7755 : ETX = USED BY DVTXRK TO DETERMINE IF TX BUFFER COMPLETED IS 
7757 : ERX = USED BY DVTXRX TO DETERMINE IF RX BUFFER COMPLETED IS 
7758 : EXPECTED. 
7759 : 
7760 3 
7761 > CALLING SEQUENCE: 
ha : JMP ALLTR GO TO TRANSMIT-RECEIVE FOR ALL STANDARD MODES 
7764 
7765 
7766 031074 ALLTR: 
7767 031074 032737 000004 906574 ALCKS: BIT WORK, FLAG 
7768 031102 001420 BEQ ALCKi :1F NOT RX GO TO TX'S 
7769 031104 013702 006516 MOV CPTRR,R2 
7770 031110 011237 006534 MOV (R2), TEMP2 
7771 031114 012237 006464 MOV (R2) +, DVRXA 
7772 031120 011237 006536 MOV (R2), TEMPS 
7773 031124 011237 006466 MOV (R2) .DVRCC 
7774 031130 010237 006516 MCV R2, CPTRR 
7775 031134 004737 033544 JSR PC -DVRXQ :GO QUE DEVICE 
7776 031140 004737 017624 VSR PC; LOGRXOQ [LOG REC QUED 
7777. 031144 032737 000010 006574 ALCK1: BIT #OTX, FLAG 


















K 10 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN=81 10:00 PAGE 13-11 SEQ 0127 


CVCLHB.P11  15=JUN-81 15:48 TRANSMIT = RECEIVE FOR ALL STANDARD MODES 
7778 031152 BEQ ALCK2 :IF NO TX''S GO TO 2 
7779 031154 oO sF05 006520 MOV PTR,R2 
7780 031160 011237 006534 MOV (R2) . TEMP2 
7781 031164 012237 006450 MOV (R2)+,DVTXA 
7782 031170 011237 006536 MOV (RO), TEMP3 
7783 031174 012237 006452 MOV (R2)+,DVTCC 
7784 031200 010237 006520 MOV R2,CP 
7785 031204 004737 017570 JSR PCLOGTXO 
087 031210 004737 033646 ALC(K2: JSR’ PC, DVTXRX :GO TO TX AND RX SUB ROUT. 
7789 031214 032737 000004 006574 BIT WORX FLAG :CHECK FOR REC. MSG. 
7790 031222 001514 BEQ ALCK3 
7791 031224 013737 006464 006534 MOV DVRXA, TEMP2 
7792 031232 013737 006466 006536 MOV DVRCC. TEMP3 
7793 031240 017642 JSR PC ,LOGRXC ZLOG REC COMPLETE 
7794 031244 032737 000004 006570 UPTABL: BIT WECHOB,PARAM 31S THIS ECHO MODE (PASSIVE) 
7795 031252 001 BEQ UPTAG ‘IF NOT GO TO 4 
031254 013702 006520 MOV CPTR,R2 TELSE SET R Re TO PRESENT TX TABL 
7797 031260 013722 006534 MOV TEMP2, (R2)+ SSTORE OFF RX ADD 
7798 031264 013712 006536 MOV TEMPS, (RO) SAND CC 
7799 031270 032737 000002 006570 UPTA4: BIT A#DATCKB, PARAM 31S DATA CHECKING ASKED FOR 
7800 031276 00101 : BNE UPTA1 [IF SO GO TO 1 
7801 031300 012737 000001 006470 MOV #01, DVRCT TELSE SET DVRCT TOA 1 
7802 031 013737 006434 006516 MOV RXPTR, CPTRR [RESET POINTER 
7803 031314 022737 000003 006562 CMP #ACT MODTYP ‘IS THIS ACTIVE 
7804 031322 001 BNE UPTAS 
7805 031324 005237 006470 INC DVRCT :1F YES BUMP COUNT 
7806 031330 4 UPTA3: BR UPTEX 
7807 031332 013702 006516 UPTA1: MOV CPTRR,R2 
7808 336 011237 006530 MOV (R2), TEMP s;LOAD TEMP WITH PREV. COUNT 
7809 342 163737 006536 006530 SUB TEMPS, TEMP [LOAD TEMP WITH PREV.COUNT=CURRENT 
7810 031350 013722 006536 MOV TEMPS, (R2)+ 
7811 031354 063737 006536 006534 ADD TEMPS. TEMP2 
7812 031 013722 006534 MOV TEMP2. (R2)+ ;STORE OF NEW ADD 
- 7813 031366 013712 006530 MOV TEMP, (R2) [AND NEW CC 
7814 031372 162702 000002 SUB #2,R2 :PUT POINTER BACK TO ADDR. 
7816 031376 010237 006516 MOV R2,CPTRR ZAND RESTORE IT. 
7818 031402 UPTEX: 
7819 031402 022737 000002 006562 CMP #PAS MODTYP 
7820 031410 001007 BNE ALCK2A :1F NOT PASSIVE LOOP THEN GO TO 2A 
7821 031412 042737 000104 006574 BIC WORX+MERX.FLAG CLEAR BOTH EXPECTED AND COMPLETED FLAGS 
7822 031420 052737 000210 006574 BIS WOTX+METX.FLAG SET THE TX FLAGS 
7823 031426 BR ALCK1 
7825 031430 005337 006470 ALCK2A: DEC DVRCT :DEC REC COUNT 
7826 031434 005737 006470 TST DVRCT tI1S IT ALL DONE 
7827 031440 001005 BNE ALCK3 *NO. GO CHECK TX 
7828 031442 042737 000004 006574 BIC #ORX. FLAG SCLEAR THE RX FLAG 
031450 005037 006516 CLR CPTRR [YES. CLEAR POINTER 
7830 031454 032737 000010 006574 ALCK3: BIT #OTX,FLAG [1S IT Tt 
7831 462 001447 BEQ ALCK4 SIF NOT TX THEN GO BACK 
7832 031464 013737 006450 006534 MOV DVTXA, TEMP 
031472 013737 006452 DVTCC. TEMP :LOG TX COMPLETED 



























031622 


15-J 


CVCLHB DPV-11 DATA COMM, LINK 
CVCLHB.P11 UN-81 48 


15: 
017606 
006454 


000210 
000104 
006454 
031622 
006454 


031074 
0 


06520 
031210 


TEST 


006562 
006574 
006574 


006574 
006570 





MACY11 a vse 2 


ALCK3A: 


ALCK3C: 
ALCK38: 


ALCK4: 


ALCK4A: 


ALCK4B: 


L 
16=JUN-81 


10 
10:00 PAGE 13-12 SEQ 0128 


RANSMIT = RECEIVE FOR ALL STANDARD MODES 


PC ,LOGTXC 
pviCT 

#PAS ,MODTYP 
ALCK3A 


LCK 
MQTX+ETX, FLAG 
MORX+ERX FLAG 


#QTX, FLAG 
#DATCKB, PARAM 
ALCK4A 

CPTRR 


ALCK3C 
CPTR 
ALCK4B 
ALCK2 


DEC TX COUNT 
;1F NOT ee ie MODE GO TO 3A 
ZCLEAR THE TX FLAGS 
SAND SET THE RK FLAGS 
:IF MORE RX°S DO IT 
COMPARE 


71S IT ALL DONE 
1F NOT G0 BACK TO 5 


31F SOME RX’'S LEFT GO BACK 
BRANCH IF ANY TX'S LEFT 


10 
10:00 PAGE 13-13 





CVCLHB DPV=11 DATA COMM. LINK TEST MACY11 ve gs & 16=JUN-81" SEQ 0129 
CVCLHB.P11 15=JUN-81 15:48 A COMPARISON CODE 

7861 .SBTTL DATA COMPARISON CODE 

7862 

7863 

7864 3+ 

re? ; FUNCTIONAL DESCRIPTION: 

7867 3 CMPSR = COMPARE CODE 

7868 ; THIS CODE COMPARES THE RECEIVED DATA AGAINST THE 

as 3 EXPECTED AND FILLS THE EVENT LOG WITH 1 OF 3 MSGS. 

«tal : NOTE: IF NO DATA CHECKING SKIP THIS CODE 

7873 : 1.) A DATA COMPARISON Ewrny WHICH REPORTS THE NUMBER 

7874 3 COMPARISON ERRORS FOUND. 

7875 3 2.) Oare COMPARISON ENTRY WHICH REPORTS DIFFERENCES 

7876 3 REC LENGTH TO COMPARE LENGTH. 

7877 ; 3.) NDATA COMPARISON STARTED ENTRY WHICH REPORTS ADDRESS 

7878 : OF RECEIVE BUFFER AND BYTE COUNT. 

7879 : THIS CODE ALSO REPORTS SOFT ERRORS FOR DATA COMPARISON 

roe 3 (THE FIRST 5 ONLY),LENGTH ERROR,AND TOTAL NUMBER OF ERRORS 

7882 : 

hey ; SUBORDINATE ROUTINES USED: 

7885 : *LOGCMP’’ = SEE ITEM 3 ABOVE 

7886 ; "LOGCML'' = SEE ITEM 2 ABOVE 

Ao 34 3 "LOGCMD’’ = SEE ITEM 1 ABOVE 

7889 3: CALLING SEQUENCE: 

re90 : JMP CMPSR ; JUMP TO DATA COMPARISON CODE 

7892 

7893 031622 032737 000002 006570 CMPSR: BIT #DATCKB,PARAM ;1S DATA CHECKING TO BE DONE 

7894 031630 001522 BEQ CMPSEX IF NOT THEN EXIT 

7895 031632 013737 906434 006520 MOV RXPTR,CPTR PUT START OF RX POINTERS TO CPTR 

7896 1640 013737 006440 006516 MOV CMPPTR,CPTRR ; AND START OF COMPARE POINTS TO CPTRR 

7897 031646 013737 006472 006470 MOV RXMTOT,DVRCT 

7899 031654 CMPS3: 

7900 031654 013702 006520 MOV C R2 sMOVE CURRET RX PT.TO R2 

7901 031660 011237 0065 MOV (R2), TEMP2 sMOVE RX ADD TO EVENT LOS 

7902 031664 012201 MOV (R2)+,R1 :SET R1 TO START ADD OF R 

7903 031666 012237 006536 MOV (R2)+, TEMPS [SET CHAR COUNT TO EVENT “L0G 

fale 031672 010237 006520 MOV R2,CPTR SRESTORE RX POINT 

7906 031676 013702 006516 MOV CPTRR,R2 ;PUT R2 AT COMPARE TABLE 

7907 031702 012203 MOV (R2)+,R3 7SET R3 TO COMPARE ADD 

7908 031704 012 MOV (R2)+,R4 [SET R4 TO COMP CC 

7909 031706 010237 006516 MOV R2,CPTRR RESTORE POINTER 

7910 031712 010437 006540 MOV R4, TEMPS 

nat 031716 004737 017736 JSR PC, LOGCMP LOG COMPARE START. 

7913 031722 020437 006536 CMP R4, TEMPS :1S COMPARE COUNT = TO RX COUNT 

7914 031726 001410 BEQ CMPS7 ;1F SO GO TO 7 

7915 031730 005237 006502 INC ERRCNT 

7916 031734 ERRSOFT 1,EDDLE,ERR10 ;PRINT ERROR 








10 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 yo gt 16-JUN-81" 10:00 PAGE 13-14 SEQ 0130 


CVCLHB.P11 15=JUN-81 15:48 A COMPARISON CODE 

(4) 031734 104457 TRAP CSERSOF T 
(5) 031736 000001 «WORD 1 
(5) 031740 015025 «WORD EDDLE 
(5) 031742 017244 «WORD ERR10 

ia at 031744 004737 017754 JSR PC,LOGCML ;LOG LENGTH ERROR 

7919 031750 005037 006540 CMPS7: CLR TEMPS ;CLEAR BAD BYTE COUNTER 

7920 031754 012737 000001 006526 MOV #1 ,OF SET :SET OFSET BYTE COUNT TO 1 

7921 031762 122123 CMPS1: CMPB (R1)+, (R3)+ [COMPARE RX WITH EXPETED 

a 031764 001422 BEQ CMPS6 ;1F EQUAL THEN GO TO 6 

7924 031766 005237 006540 CMPS2: INC TEMP4 : INC BAD COUNT 

7925 031772 023727 006540 000005 CMP TEMPS ,#5 31S 1T MORE THEN 5 

7926 032000 101014 BHI CMPS6 31F SO GO FOR MORE 

27 032002 114337 006550 MOVB ~(R3) ,GOOD TSTORE GOOD BYTE FOR ERROR 

7928 032006 114137 006551 MOVB -(R1) ,BAD TSTORE BAD BYTE FOR ERROR 

7929 032012 005237 006502 INC ERRCNT 

7930 032016 ERRSOFT 2,EDDDE,ERR1 REPORT COMPARISON FAILURE TO OPR. 
(4) 032016 104457 TRAP CSERSOF T 
(5) 032020 000002 «WORD 2 
(5) 032022 015062 «WORD EDDDE 
(5) 032024 017154 «WORD ERR1 

7931 032026 005201 INC R1 

7932 032030 005203 INC R3 

7933 032032 005237 006526 CMPS6: INC OF SET 3 INC_OFFSET 

7934 032036 005304 DEC R4 SELSE DEC CHAR COUNT AND SEE IF 0 

7935 032040 001350 BNE CMPS1 :1F NOT GO BACK 

7936 032042 005737 006540 TST TEMPS 7SEE IF ANY CMP ERRS FOR THIS MSG 

7937 032046 001410 BEQ CMPSSA BR IF NONE 

7938 032050 005237 006502 INC ERRCNT 

7939 032054 ERRSOFT 3,EDDDE ,ERR2 REPORT # OF MISMATCHES FOR MESSAGE 
(4) 032054 104457 TRAP CSERSOF T 
(5) 032056 000003 -WORD 3 
(5) 032060 015062 «WORD EDDDE 
(5) 032062 017216 -WORD ERR2 

7940 032064 017772 CMPS5: JSR PC,.LOGCMD ;LOG DATA ERROR IN COMPARE 

7941 032070 CMPSSA: 

7942 032070 005337 006470 DEC DVRCT 

7943 032074 001267 BNE CMPS3 71F NOT ALL DONE GO BACK 


oo <A ma we aa mA cm aes ae 


B 11 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 13-15 SEQ 0131 
CVCLHB.P11 15=JUN-81 15:48 MODEM CHANGE REPORTS 

7946 .SBTTL MODEM CHANGE REPORTS 

7947 

7948 j++ 

7949 ; FUNCTIONAL vESCRIPTION: 

7950 : THIS SECTION REPORTS THE NUMBER OF MOMDEM STATUS CHANGES 

7951 3 THAT OCCUR ON EACH PASS. THE ERROR IS ONLY REPORTED IF 

7952 ; THERE WERE ANY CHANGES IN OTHER WORDS A COUNT OF ZERO IS 

7953 PF NOT REPORTED. THE CHANGES ARE REPORTED IN TWO CLASSES .. 

7954 ; HARD ERRORS AND GLITCHES. HARD ERRORS ARE WHEN THE DEVICE 

7955 ; IS ABLE TO LATCH UP THE BAD MODEM STATUS. GLITCHES OCCUR 

7956 3 WHEN THE MODEM STATUS CHANGES TO CAUSE A DATA SET CHANGE 

7957 3 INTERRUPT BUT THE CHANGE DOES NOT OCCUR LONG ENOUGH FOR 

jae. Z THE DEVICE TO LATCH THE DATA 

7960 3; INPUTS: 

7961 ; *MGLCNT"’ - CONTAINS NUMBER OF GLITCH ERRORS 

Las s *MHRCNT" = CONTAINS NUMBER OF HARD ERRORS 

7964 : OUTPUTS: 

7965 ; *MGLCNT'’ -ZEROED BY THIS SECTION 

7966 ; *MHRCNT'* -ZEROED BY THIS SECTION 

7967 : 

7968 28 : 

5359 eh 

7971 032076 005737 011466 CMPSEX: TST MGLCNT : CHECK FOR ANY Si ERRORS 

7972 032102 001003 BNE MCREP :1F NON ZERO REPORT THEM 

7973 032104 005737 011470 TST MHRCNT + CHECK FOR ANY HARD ERRORS 

ada 032110 001412 BEQ ENDPS : IF NONE GO TO END OF PASS 

ade ;REPORT ANY MODEM ERRORS HERE 

7978 032112 005237 006502 MCREP: INC ERRCNT ;BUMP ERROR COUNT 

7979 032116 ERRSOFT 4,MSCMS,ERR4 

(4) 032116 104457 TRAP CSERSOF T 
(5) 032120 000004 -WORD 4 
(5) 032122 014461 -WORD MSCMS 
(5) 032124 017274 -WORD ERR4 
7980 032126 005037 011466 CLR MGL CNT :CLEAR GLITCH COUNT 

7981 032132 005037 011470 —~OR MHRCNT : CLEAR THE HARD COUNT 

7982 ’ 
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CVCLHB DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) _16=JUN-81 10:00 PAGE 13-16 SEQ 0132 


CVCLHB.P11.-15-JUN-81 15:48 INTERNAL END OF PASS CODE 
7984 “SBTTL INTERNAL END OF PASS CODE 
7985 
7986 
7987 : 
7963 SC UNCTIONAL DESCRIPTION 
7989 : THIS CODE INCREMENTS THE PASS COUNT FOR THE 
7990 : EVENT LOG, LOGS THE END OF PASS EVENT 
7991 ; IF 'RPASS’' IS A MINUS ONE RETURN TO MODE 
7992 ; DISPATCHER. IF NOT ~1 THEN DECREMENT RPASS 
7993 : AND IF 'RPASS'' IS THEN = TO 0 GO TO DCLT PROMT 
7994 ; IN NOT = TO 0 THEN GO BACK TO MODE DISPATCHER 
799% : SUBORDINATE ROUTINES USED: 
7998 “LOGEOP'' - LOG END OF PASS TO EVENT LOG 
8000 ia eS 
B00} 032136 005237 006500 ENDPS: INC PSCNT :BUMP PASS COUNT 
8008 032142 013737 006476 006540 MoV _—OPVAR, TEMP4 
8004 032150 013737 006500 006534 MOV —«~PSCNT . TEMP2 
B00S 032156 013737 006502 006536 MOV ERRCNT.. TEMP3 
8006 032164 004737 020010 JSR _—~ PC. LOGEOP :LOG END OF PASS 
8008 032170 022737 177777 006572 CMP ss #=1, PASS ;SEE_IF RPASS=~1 
8009 032176 001403 BEQStséd1S ‘TF IT IS DON'T DECRMNT, LOOP FOREVER 
8010 032200 005337 006572 DEC —sRPASS “DEC PASS COUNT 
8011 032204 001402 BEO —-_-2$ SIF DONE EXIT TEST 
B012 032206 000137 030636 1$: IMP ——sGTRX2 “ELSE GO BACK AND DISPATC 
8018 032212 000137 025374 2$: MP —GTRAS ‘CHEN RPASS=0 GO BACK 10° DCLT>" 
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CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16-sUN-81 _ PAGE 13-17 SEQ 0133 
CVCLHB.P11 15=JUN-81 15:48 DOWN=LINE=LOAD S 


8016 - SBTTL DOWN=LINE=LOAD SECTION 


p++ 
; FUNCTIONAL DESCRIPTION: 
: DOWN LINE LOAD IS NOT SUPPORTED BY THIS DEVICE.. 

8020 ; IF THIS MODE IS CALLED BY THE COMMAND LINE INTERPRETER 
; THEN A MESSAGE WILL BE PRINTED ....THAT SAYS DOWN LINE 
; LOAD IS NOT!! SUPPORTED BY THIS DEVICE. 


8036 032216 DLL: 

8037 032216 PRINTF #DLLCM 
(7) 032216 012746 013632 MOV A#DLLCM,-(SP) 
(6) 032222 012746 000001 MOV #1,-(SP) 
(3) 032226 010600 MOV SP ,RO 


(4) 032232 062706 000004 ADD #4,SP . 
025374 JMP GTRAS 


E 11 : 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 gly t 16=JUN-81 10:00 PAGE 13-18 SEQ 0134 
CVCLHB.P11 15=JUN=81 15:48 TALK MODE SECTION 


8041 .SBTTi TALK MODE SECTION 

8042 

8043 p++ 

8044 ; FUNCTIONAL DESCRIPTION: 

8045 ; TA LK MODE SECTION 

8046 ; IN THIS MODE, THE ‘‘TALK'’ END OF THE LINK TRANSMITS OPERATOR 

8047 : SPECIFIED MESSAGES UNTIL A ‘‘EXiT'' MESSAGE IS TYPE. AT THAT POINT, 

008 : THIS END OF THE LINK GOES INTO ‘'LISTEN’’ MODE. 

Bae ; SUBORDINATE ROUTINES USED: 

8052 ; *LOGTXQ’’ = LOG TX BUFFER QUED TO EVENT LOG 

8053 : ‘DVTXRX'' = QUE TX BUFFER TO DEVICE AND WAIT FOR COMPLETE 

pate: : "LOGTXC’' = LOG TX COMPLETE TO EVENT LOG 

8056 : CALLING SEQUENCE: 

tt ; JMP @MODE (R2) DISPATCH TO MODE BASED ON MODE TYPE IN R2 

8059 

8060 032242 TALCK: 

8061 032242 042737 000002 006570 BIC #DATCKB,PARAM :SET NOCHECK 

8062 032250 012702 002520 MOV #OPBUF ,R2 

8063 032254 0612722 177777 1$: MOV #-1,(R2)+ CLEAR OUT OPBUFFER FIRST 

8064 032260 022702 002642 CMP #OPEND ,R2 ; 

8065 032264 001373 BNE 1$ 

032266 GMANID OPRMM,OPBUF ,A,0,1,72.,NO GET TALK MESSAGE 

(3) 032266 104443 TRAP c$ 
(3) 032270 BR 10001$ 
(4) 032272 002520 . WORD F 
(5) 032274 0001 -WORD TSCODE 
(5) 032276 013566 . WORD 
(5) 032300 000000 -WORD O 
(5) 032302 000001 - WORD TSLOLIM 
(5) 032304 000110 . WORD TSHILIM 
(3) 032306 10001$: 

8067 032306 005002 CLR R2 ;NOW GET CHAR COUNT 

8068 032310 122762 000377 002520 2$: CMPB #377 ,OPBUF (R2) 

8069 032316 001402 BEQ 3$ 

8070 032320 005202 INC R2 

8071 032322 000772 WR 2$ 

ah 032324 010237 002166 3$: MOV R2,0PCNT 

8074 032230 012737 002520 006450 MOV #OPBUF , eat :SET UP TX ADDR. 

8075 032336 012737 002520 006534 MOV MOPBUF , TEMP2 

8076 032344 013737 002166 006536 MOV OPCNT, tEMPS 

8077 032352 013737 002166 006452 MOV OPCNT ,DVTCC sSET UP TX CC 

8078 032360 004737 017570 JSR PC, LOGT xQ 

8079 032364 052737 000210 006574 BIS MQTX+HETX,FLAG ;SET UP FLAGS 

pat 032372 005037 006516 CLR CPTRR :CLEAR RX POINTER 

Boas 032%76 004737 033646 JSR PC ,DVTXRX 

8084 032402 013737 006450 006534 MOV DVTXA, TEMP2 

8085 032410 013737 006452 006536 MOV DVTCC, TEMPS 

8086 032416 004737 017606 JSR PC ,LOGTXC 


8087 032422 022737 054105 002520 CMP #'EX , OPBUF CHECK FOR EXIT 





mi 


CVCLHB DPV=11 DATA COMM. LINK TEST 
CVCLHB.P11 15=JUN=81 15:48 


MACY11 30A(1052) 


F 1 
16=JUN-81 1 


TALK MODE SECTION 


8088 032430 001304 BNE 
8089 032432 022737 052111 002522 CMP 
8090 032440 001300 BNE 
8091 032442 042737 000210 006574 BIC 
8092 032450 012737 000006 006562 MOV 
8093 032456 000137 030636 JMP 


TALCK 
#' IT ,OPBUF +2 
TALCK 


AL 

MQTX+METX FLAG 
#LIS,MODTYP 
GTRX2 


. 
0: 


00 PAGE 13-19 


;CLEAR THE TX BITS 
; CHANGE TO LISTEN MODE 
;AND GO BACK TO DISPATCH 


SEQ 0135 


— — 


CVCLHB DPV=-11 DATA Or LI TEST 


CVCLHB.P11 
8095 


| 
| 
| 
| 
| 
| 8103 
032462 


032546 


032552 
032556 


032562 


15=JUN=81 


042737 


012746 
012746 
010600 


004737 


013737 
013737 
004737 

063737 
105077 


012746 
012746 
0600 


000002 


013555 
000001 


033544 
017624 


033646 
006464 
006466 
017642 
006464 
153646 
002514 
000001 


000004 
054105 
052111 


000005 
030636 


006570 


006534 
006536 


006466 


002520 
002522 
006562 


G1 
MACY11 30A(1052) 16=JUN-81 
LISTEN MODE SECTION 


LISTEN MODE SECTION 


11 
10:00 PAGE 13-20 SEQ 0136 


.SBTTL 


: FUNCTIONAL DESCRIPTION: 
LISTEN MODE SECTION 
IN THIS MODE, THE "‘LISTEN'' END OF THE LINK PRINTS ALL OF THE MESSAGES 
RECEIVED BY THE DEVICE ON THE OPERATOR'S CONSOLE. IF THE MESSAGE 
RECEIVED IS AN ‘EXIT'' MESSAGE, THEN THE NODE ENTERS ‘TALK’ MODE. 


SUBORDINATE ROUTINES USED: 


: "“DVRXQ'' = QUE RECEIVE BUFFER SPACE TO DEVICE 
: "LOGRXQ"" = LOG RECEIVE BUFFER QUED TO EVENT LOG 
: ‘“DVTXRX'' = WAIT FOR RX TO COMPLETE 
; “LOGRXC'’ = LOG RX COMPLETE TO EVENT LOG 
+ CALLING SEQUENCE: 
: JMP @MODE (R2) :DISPATCH TO MODE BASED ON MODE TYPE IN R2 
LISCK: BIC #DATCKB,PARAM CLEAR CHECK BIT 
PRINTF #LISP sPRINT PROMPT FOR OPR. 
MOV ALISP,-(SP) 
MOV #1,-(5P) 
MOV “RO 
TRAP CSPNTF 
3 ADD #4 ,SP 
LISCKA: MOV #OPBUF .DVRXA —-: SET _ DEVICE UP TO REC AT OPBUF 
MOV #OPBUF . TEMP2 
MOV #82. ,DVRCC :SET UP CHAR COUNT TO 82. 
MOV #82. .TEMP 
BIS HORX+H#ERX,FLAG ;SET UP FLAG 
CLR CPTR “CLEAR THE TX. 
JSR PC,DVRXQ ZQUE RX 
JSR PC-LOGRXQ 
JSR PC ,DVTXRX :GO TO DEVICE RX. SUBROUTINE 
MOV DVRXA, TEMP2 
MOV DVRCC.TEMP3 :SET UP ADDR.AND CC. 
JSR PC,LOGRXC [LOG COMPLETED 
ADD DVRXA, DVRCC 
CLRB — aDVRCC 
PRINTF # 
MOV #OPBF PT, -(SP) 
MOV #1,-(SP) 
MOV SP_RO 
TRAP CSPNTF 
ADD #4 ,SP 
CMP #’ EX, OPBUF :COMPARE FOR EX OF "EXIT"’ 
BNE LISCKA ‘IF NOT EXIT THEN GO BACK 
CMP #11, OPBUF+2 IF FIRST HALF OK CHECK NEXT PART 
BNE LISCKA ‘IF NOT EXIT THE GO BACK 
MOV #TAL,MOD1YP SCHANGE MODE TO TALK 
JMP x2 SRETURN TO DISPATCHER 


| H 11 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN=81 10:00 PAGE 13-21 
CVCLHB.P11 15=JUN-81 15:48 LISTEN MODE SECTION 


SEQ 0137 


a 
| 
| 








8 
LE 


RURLELSSLS 
OWONAUSWR oO 


8220 


032672 


032672 


15=JUN=81 


012777 


105777 
001423 


000001 


156512 


CVCLHB DPV=11 DATA COMM, LINK TEST 
VCLHB.P11 15:48 


156524 


111 
MACY11 30A(1052) 16=JUN=81 10: 00. PAGE 13-22 
DEVICE FUNCTION SUBROUTI 
SBTTL DEVICE FUNCTION SUBROUTINES 
SBITL DEVICE INIT SUBROUTINE 
es 
+ FUNCTIONAL DESCRIPTION: 
: DVINIT= DEVICE INIT ROUTINE 
: PMI ROUTINE IS DEVICE DEPENDENT CODE THAT INITS 
: THE DEVICE BEING TESTED 
IT SETS THE DEVICE UP TO THE MODE IT IS TO RUN I 
: INITIATES THE START.STACK,ACK SEQUENCE IF THE "RWODE" “REMOTE 
: NODE) INPUT INDICATES THE REMOTE NODE IS NON-ITEP 
: INPUTS: “EHDPLX'' INDICATES IF MODE IS FULL OR HALF DUPLEX. (1=FULL) 
: ADDRESS POINTERS (SELO,...) ALREADY POINT TO DEVICE'S REG.S 
: 'MLTYP"' INDICATES THE LOOP TYPE (1=TTL,2=CAB,3=RM,4=LM 
; “RNODE'' INDICATES THE TYPE OF REMOTE NODE (ITEP=1 ITEP 0) 
+ SUBORDINATE ROUTINES USED: 
; “CTSSR'' = CLEAR TO SEND SUB ROUTINE 
: VIN31"" = SEND CONTROL AND REC OR TIME OUT 
: “CLRRTS'' = CLEAR REQUEST TO SEND ROUTINE 
: “LGDVE'' = LOG DEVICE ERROR TO EVENT LOG 
: CALLING SEQUENCE: 
: JSR PC,DVINIT 
DVINIT: 
;MASTER CLEAR DEVICE 
MOV WRESET,@TXCSR ;DO A MASTER CLEAR 
TSTB — @RXCSR :SEE IF IT WORKED 
BEQ DVINI “BRANCH IF OK 
BREAK 
TRAP — C$BRK 
:REPORT ERROR IF RESET 
“DOES NOT WORK 
MOV #DVEMO, TEMP 
MOV @RXCSR. TEMP 
MOV @TXCSR.TEMP4  ;LOAD UP ERRM, AND REG OUTPUTS 
JSR PC ,LGDVE *LOG TIME OUT WAITING FOR RUN 
INC ERRCNT 
ERRSOFT 5,DVEMO,ERR13 
TRAP — CSERSOFT 
.WORD 5 
"wORD  DVEMO 


SEQ 0138 


rc -_ CC -  -- 


CVCLHB DPV=11 DATA COMM, hl TEST 


CVCLHB.P11 15=JUN=81 15:4 

(5) 032750 017326 
8243 032752 000747 
8244 
8245 
8246 
8247 032754 042737 00000 
8248 032762 042777 000010 
8249 032770 022737 000001 
8250 032776 1 
8251 033000 052777 000010 
BS2¢ 033006 
8254 033010 022737 000002 
8255 033016 001451 
8256 ' 
8257 
8258 033020 022737 000004 
8259 033026 001002 
ases 033030 000137 033460 
aces 033034 012777 000002 
8264 033042 012737 002000 
8265 033050 005737 006634 
8266 033054 001022 
8267 
8268 
8269 
8270 033056 012737 017067 
8271 033064 017737 156326 
8272 033072 017737 156326 
8273 033100 737 ~017652 
8274 033104 005237 502 
8275 033110 

(4) 033110 104457 

(5) 033112 13 

(5) 033114 017067 

(5) 033116 017326 
8276 0331 000745 
8277 033122 

(3) 033122 104422 
8278 033124 017737 156266 
8279 033132 032737 001000 
8280 033140 001743 
8281 033142 013777 011440 
8282 033150 005737 011472 
8283 033154 001141 
8284 033156 005737 006566 
8285 033162 001536 
8286 
8287 
82 33164 112737 000005 
8289 033172 052737 000060 
8290 033200 012737 000074 
8291 033206 004737 035136 
8292 033212 012737 000006 


006574 
156434 
006564 


156416 


006564 
006562 


156354 
0066%4 


011444 
011444 


156250 


002645 
006574 
006640 


002646 





MACY11 30A(1052) 


DVIN1: 


DVIN3: 


DVIN3A: 


DVIN38: 


DVIN39: 


DVIN3?7: 


DVING1: 


16=JUN-81" 


J11 
10:00 —_ 13-23 


DEVICE INIT SUBROUTI 


BR DVINIT 
:SET TTL LOOP IF REQU'D 
BIC #3, FLAG 

BIC ATTLL, @TXCSR 
CMP ATTL,MLTYP 

BNE DVIN 

BIS ATTLL,@TXCSR 
BR DVIN37 

CMP #CABLE ,MLTYP 
BEQ DVIN37 

CMP #D0W,MODTYP 
BNE DVIN3A 

JMP DVINEX 

MOV #DTR,@RXCSR 


MOV #2000, TIMER1 
TST TIMERi 
BNE DVIN39 


:SET ERROR FOR NO MODEM 


MOV ADVEM6, TEMP2 
MOV @RXCSR, TEMPS 
MOV aTXCSR, TEMPS 
JSR PC, LGDve 

INC ERRCNT 

ERRSOFT 11,DVEM6,ERR13 
BR DVIN3A 

BREAK 

MOV @RXCSR, IRXCSR 
BIT #B1T9,IRXCSR 
BEQ DVIN3 

MOV DPVP1,a@PCSAR 
TST RNODE 

BNE DV INEX 

TST FHDPLX 

BEQ DVINEX 

;SET UP TO SEND STRT 
MOVB #5 ,HDMSG+1 
BIS #RXM! TXM, FLAG 
MOV #60... TIMERS 
JSR PC,CTSSR 

MOV #6,HDMCC 


«WORD _ERR13 
;GO BACK AND TRY MSTR CLR AGAIN IF ERROR 
CLEAR INPUT AND OUTPUT INT FLAGS 
;CLEAR INTERNAL LOOP 
IS TTL seecrre 
F NOT GO TO 3 
TELSE SET INTERNAL LOOP 
71F CABLE LOOP SKIP CHECK 
:FOR MODEM READY 
CHECK IF DLL 
BRANCH IF NOT DLL 
ELSE EXIT 
SET UP DTR. 
IF TIMER NOT OUT GO TO 39 
READY 
TRAP CSERSOF T 
-WORD 11 
-WORD DVEM6 
«WORD ERR13 
; THEN TRY TO SET DTR AGAIN . 
TRAP C$BRK 


:GET COPY OR RXCSR 
:1S MODEM READY SET 


SET UP PCASAR 


A 
R FOR ; MINUTE 
IF NESC 
UP STRT CODE 


SEQ 0139 
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CVCLHB.P11 15=UN-81 15:48 DEVICE INIT SUBROUTINE 
8293 033220 004737 035006 JSR PC,DVIN31 ;GO TX STRT AND CHK FOR RX. 
8294 033224 005737 006640 TST TIMERS . 
8295 033230 001466 BEQ DVIN81 +IF TIMER EXPIERED EXIT 
8539 033232 022737 000006 002660 DVIN4: CMP #6,RHDMCC :1S THE RCVD=STRT 
8298 033240 001441 BEQ DVIN8 sIF $0 Go 10. ASTRI 
8299 033242 022737 000007 002660 CMP #7,RHDMCC ‘1S IT A STA 
oon 033250 001360 BNE DVIN41 s1F NOT STACK ETIHER GO BACK 
8302 033252 004737 035136 DVIN9: JSR PC,CTSSR ;SET REQUEST TO SEND 
8303 033256 042737 001010 006574 BIC WQTX'PAD,FLAG CLEAR TX COMPT FLAG. 
8304 033264 012737 000001 002646 MOV #1,HDMCC :SET UP ACK 
8305 033272 012737 002645 011450 MOV #HDMSG+1,MSGPTR :SET UP POINTER 
8306 033300 013737 002654 011452 MOV HDMC ,MSGCC 
8307 012737 000010 011454 MOV #8... SYNCC :SET UP SYNC COUNT 
033314 052777 000120 156102 BIS #TXENA! TINTEN, @TXCSR 
8309 033322 032737 000010 006574 DIVN91: BIT #QTX,FLAG 
8310 033330 001053 BNE DVINEX sEXIT IF ACK SENT 
8311 033332 BREAK 
(3) 033332 104422 TRAP ——- C$BRK 
8312 033334 005737 006640 TST TIMERS 
8313 033340 001370 BNE DIVN91 :IF NOT TIMER EXPIRED RECHK TX. 
Sere 033342 000421 - BR DVIN81 : IF TIMER OUT REPORT IT 
8316 033344 012737 000007 002646 PVIN8: MOV #7,,HDMCC :SET POTINTER TO STACK 
8317 033352 004737 035006 JSR PC,DVIN31 sAND GO SEND STACK 
8318 033356 005737 006640 TST TIMERS 
8319 33362 001411 BEQ N8 sREPORT ERROR IF TIME OUT 
33364 022737 000001 002660 CMP #1,RHDMCC SIS IT ACK RCVD? 
8321 033372 001432 BEQ DVINEX sIF SO EXIT 
8322 033374 022737 000007 002660 CMP #7 ,RHDMCC ‘IS IT STACK RCVD 
8323 033402 001723 BEQ DVI :IF SO SEND ACK 
8324 033404 757 DVIN8 SIF NEITHER SEND ANOTHER ACK 
Sese :DO ERROR AND REPEAT 
8328 033406 012737 017003 006534 DVIN81: MOV #DVEMS , TEMP2 
8329 033414 013737 002660 006536 MOV RHDMCC. TEMP3 
8330 033422 013737 002646 006540 MOV HDMCC, TEMPS ;LOAD UP ERRM. AND REG OUTPUTS 
8331 033430 004737 017652 JSR PC, LGDVE “LOG TIME OUT WAITING FOR RUN 
8332 033434 005237 006502 INC ERRCNT 
83335 033440 ERRSOFT 10.,DVEMS,ERR13 
(4) 033440 104457 ; TRAP CSERSOF T 
(5) 033442 spades «WORD 10 
(5) 033444 01700 “WORD  DVEMS 
(5) 033446 017326 "WORD ERR13 
8334 033450 005237 006476 INC OPVAR :COUNT HOW MANY TIMES WE DO THIS. 
8355 033454 000137 032672 JMP DVINIT [TRY ALL OVER AGAIN 
8337 033460 004737 035310 DVINEX: JSR LAR :CLEAR RTS IF NESC 
8338 033464 042737 173777 006574 BIC WP ay FLAG *CLEAR FLA 


AG WORD 
8339 033472 052737 002000 006574 BIS #INOVR,FLAG :SET THE INITT OVER FLAG 
8340 033500 000207 RTS PC RETURN TO CALLER 
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CVCLHB.P11 15=JUN-81 15:48 DEVICE GET MODEM STATUS SUBROUTINE 
8344 .SBTTL DEVICE GET MODEM STATUS SUBROUTINE 
8355 
8356 
8357 p++ 
8358 ; FUNCTIONAL DESCRIPTION: 
8359 ; “DVMODS'' GET MODEM STATUS 
8361 : IMPLICIT INPUTS: 
8362 : THE BIT POSITION AND AVAILABILITY OF THE MODEM SIGNALS CTS,DSR,...RI.. 
8365 ; FOUND IN THE DEPENDENT PORTION OF THE GLOBAL EQUATES SECTION. 
8365 : OUTPUTS: 
Sees ; CURRENT MODEM SIGNAL VALUES IN ‘MODS"’ 
8368 : 
8369 > CALLING SEQUENCE: 
8370 ; JSR PC ,DVMODS 
Be x 
8373 033502 017737 155710 007550 DVMODS: MOV @RXCSR,MODS 
8374 033510 042737 000040 007550 BIC #B1T5,MODS :CLEAR BIT 5 
8375 033516 032777 900040 155700 BIT WBITS.aTXCSR =: SEE ir 1 OR SQ SET 
8376 033524 001403 BEQ DVMEX :I1F NOT EXIT 
8377 033526 052737 000040 007550 BIS #8175 ,MODS SIF SET SET BIT 5 IN MODS 


8378 033534 042737 106720 007550 DVMEX: BIC #106720, MODS ZCLEAR ALL UNUSED BITS 
8379 033542 000207 RTS SRETURN TO CALLER 
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DEVICE QUEUE RECEIVE SPACE SUBROUTINE 


DEVICE QUEUE RECEIVE SPACE SUBROUTINE 


crag DESCRIPTION: 


THIS SUBROUTINE QUEUES THE RECIEVER BUFFER SPACE TO THE 
DEVICE, THEN CLEARS THE QRX BIT OF THE FLAG WORD. 


; INPUTS: 
: DVRXA = ADDRESS ae RX BUFFER SPACE 
3 DVRCC = BYTE CHAR COUNT OF RX BUFFER 
: QRX FLAG BIT = SET BY CALLING ROUTINE 
; OUTPUTS: 
; QRX FLAG BIT = CLEARED BY ROUTINE 
: CALLING SEQUENCE: 
3 JSR PC,DVRXQ 
DVRXQ: 
BIT #QRX FLAG 
BEQ DVREX :IF NOT RX THEN EXIT 
TELSE QUE RX 
BIC #QRX+ABCC+ARXM, FLAG sCLEAR FLAG FOR RX 
TST RNODE TIF NON ITEP GO TO 2 
BEQ DVRX2 
BIS ARXM+ABCC FLAG ;GET JUST THE DATA NO CRC. 
MOV DVRXA,RMSGPT 
MOV #72,RMSGCC ;SET UP RX TO GET ITEP MSG. 
MOV #70,DVRCC 
BR DVRX3 
sENABLE RX, RX INTERRUPTS,AND DATA SET INTERRUPTS 
DVRX2: MOV #RHDMSG+1,RMSGPT 2SET UP POINTER 
MOV HDMC, RMSGCC 
DVRX3: BIS #RINTEN!RXENA! ADSITEN, aniCsR 
DVREX: PC RETURN TO CALLER 


SEQ 0142 
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DEVICE TRANSMIT AND RECEIVE SUBROUTINE 
. SBTTL DEVICE TRANSMIT AND RECEIVE SUBROUTINE 


:++ 

; FUNCTIONAL DESCRIPTION: 

DVTXRX=DEVICE TRANSMIT AND RECEIVE ROUTINE 

THIS CODE QUES THE TRANSMIT BU; FER TO THE DEVICE 

IF NEEDED. THE CODE THEN ye FOR A TX te Fe 

RX COMPLETE OR BOTH. THE C REPORTS A TIME OUT 
ERROR IF NO OUTPUT INTERRUPT IS RECIEVED BEFORE 

60 SECONDS. AFTER REPORTING ERROR TIMER IS RE STARTED 
AND DEVICE WILL CONTINUE TO WAIT FOR INTERRUPT. 


TS: 
"DVTXA'’ = ADDRESS OF TRANSMIT MSG. 


"DVTCC’* = BYTE COUNT OF TRANSMIT MSG. 
“QTX'' BIT = SET IF TRANSMIT REQUESTED 
"ETX’’ BIT = SET IF TRNASMIT EXPECTED 
“ERX'' BIT = SET IF RECIEVE EXPECTED 

OUTPUT 

“DVTXA’’ = ADDRESS OF TX MSG. COMPLETED 

“DVTCC’’ = BYTE COUNT OF TX MSG. COMPLETED 

"QTX’’ = SET IF TX COMPLETED 

*“DVRXA'' = ADDRESS OF RX MSG. COMPLETED 

“DVRCC’' = BYTE COUNT OF RX MSG. COMPLETED 

"QRX'' = SET IF RX COMPLETED 


SUBORDINATE ROUTINES USED: 
"LGDVE'' = LOG DEVICE ERROR TO EVENT LOG 


CALLING SEQUENCE: 

JSR PC ,DVTXRX 

DVTXRX: BIT #QTX, FLAG sANY TX TO QUE 
BEQ DVTR :1F NOT GO WAIT FOR OUPUT 
BIC M#QTX+A4TXM+PAD ,FLAG ZCLEAR FLAG 
JSR PC.CTSSR :GO SET CTS 
TST RNODE 
BEQ DVTR1 7 1F NON-ITEP GO TO 1 
BIS #TXM, SET THE BODY BIT 


a ALLE “MSGCC 
ENABLE TX AND TX INTER, 


AND SET UP FOR ACTUAL DATA 


DVTR1: MOVB #201 ,HDMSG+1 SET UP SOH 
MOV #HDMSG+1 ,MSGPTR SET POINTER TO HEADER 
MOV DVTCC,HDMCC 
MOV HDMC ,MSGCC SET CC FOR ae te 
DVTR2: MOV #177, SYNCC SET UP FOR 177 SYNCS. 
B #TXENA! #TINTEN, @TXCSR 
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DVTR3: 
DVTR8: 


TOINOT: 


DVTR4: 


DVTREX: 


EVICE TRANSMIT AND RECEIVE SUBROUTINE 
MOV #60.,TIMERS SET TIMER FOR 60 SECS 
BREAK 


TST TIMERS 
BNE TOINOT 


;L0G ERROR TIME OUT RX OR TX NOT COMPLETED 
MOV ADVEM2, TEMP2 

MOV @RXCSR, TEMPS 

MOV @TXCSR, TEMPS 

JSR PC ,LGDVE 


INC ERRCNT 
ERRSOFT 7,DVEM2,ERR13 


TRAP C$BRk 
31S TIMER EXPIRED 


TRAP ns 


. WORD 
«WORD DVEM2 
-WORD ERR13 
BR DVTR3 RETURN TO CHECK TIMER 
BIT #QTX,FLAG 31S IT TX COMPL? 


BEQ DVTR4 :BRANCH IF TX NOT DONE. 
JSR PC,CLRRTS 


BIT MERX FLAG zARE WE EXPECTING TO RX 
BEQ DVTREX ;BRANCH IF NOT. 

BIT #OQRX,FLAG 31S RX DONE 

BEQ DVTR8 :G0 BACK AND TIME IF NOT 
BIT METX,FLAG sARE WE 7 aa TO TX. 
BEQ DVTREX [BRANCH IF 

BIT #QTX, FLAG :I1S IT TX COMPLETED 

BEQ DVTR8 :GO BACK AND TIME OUT 
JSR PC,CLRRTS ;CLEAR RTS IF NESC. 

“TS PC ;AND EXIT 


SEQ 0144 


+ 
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CVCLHB.P11 15=JUN-81 15:48 DEVICE TRANSMIT AND RECEIVE SUBROUTINE 

8553 : DEVICE DEPENDENT SUBROUTINES 
8554 
8563 
8564 
8565 
S266 .SBTTL DEVICE INTERRUPT SERVICE ROUTINES 
8574 
8575 
8576 p++ 
8577 ; FUNCTIONAL DESCRIPTION: 
8578 3 RECEIVER INTERRUPT ROUTINE. WHEN A RX INT. OCCURS 
8579 : THIS ROUTINE DECIDES IF IT IS A RX STATUS,DATA SET 
8580 : CHANGE OR DATA INTERRUPT. IF IT IS A DATA SET CHANGE 
8581 ; INTERRUPT IT PUTS THE STATUS IN "‘CMODS'’ AND COMPARES 
8582 : THAT STATUS TO THE OLD STATUS IN ‘MODS'’. IF THEY ARE 
8583 : THE SAME THAT MEANS THE INTERRUPT WAS CAUSED BY A GLITCH 
8584 : ON ONE OF THE LINES. IF THEY ARE DIFFERENT THEN A HARD 
8585 : MODEM ERROR HAS OCCURED. IN ANY EVENT THE MODEM STATUS 
8586 : Gece IS LOGGED. 
8587 : IF A DATA INT. OCCURS THE ROUTINE PUTS THE DATA AWAY 
8588 : IN A BUFFER POINTED TO BY ‘'RMSGPT'' THE MSG. COUNT IS 
8589 , ; DECREMENTED BY ONE BYTE. IF COUNT IS EQUAL TO ZERO AND 
28590 : "BCC’* BIT AND “'RXM'' BIT IS SET_THEN RX IS DISABLED AND 
8591 . “ORX'' BIT IS SET. IF COUNT IS ZERO AND ‘BCC"' BIT IS SET 
8592 ; BUT "'RXM'' BIT IS NOT SET THEN MSG COUNT IS SET TO LENGHT 
8593 : RECVD_IN HEADER AND "RMSGPT'’ IS SET TO RX BUFFER LOCATION 
8594 ; AND 'RXM'' BIT IS SET 
8595 : IF COUNT IS EQUAL TO ZERO AND ‘BCC’' IS NOT SET — 
8596 3 COUNT IS SET TO 2 AND ‘'RMSGPT'' IS SET TO ‘'BCCWw'' 
coor : "BCC'’ BIT IS SET. 
8599 ; IF A STATUS INTERRUPT OCCURS THEN OVERRUN ERROR BIT IS CHECKED. 
rts] : AN ERROR IS LOGGED AND ‘‘QRX'' IS SET AND THE RX IS DISABLED. 
8602 ; INPUTS: 
8603 3 RMSGPT - ADDRESS OF RX BUFFER 
— : RMSCC = COUNT OF DATA TO BE RXED. 
8606 ; SUBORDINATE ROUTINES USED: 
8607 3 **LOGMSC"’ - LOG MODEM STATUS CHANGE 

8608 : "LGDVE"'' - LOG DEVICE ERROR 

8609 i: 
8610 
8611 034132 BGNSRV DVRXI 

(3) 034132 DVRXI:: 
8612 034132 017737 155260 011444 MOV @RXCSR,IRXCSR  ;MOV RX CSR TO IMAGE 

8613 034140 032737 000010 006570 BIT #MOCHK , PARAM ANY MODEM CHANGES TO REPORT 
8614 034146 001456 BEQ RXIN21 :1F NO’ IGNORE DS CHANGE. 

8615 034150 032737 002000 006574 BIT #INOVR,FLAG :1S INIT OVER 

8616 034156 001452 BEQ RXIN21 ‘NO THEN IGNORE DS CHANGE. 

8617 034160 005737 011444 TST IRXCSR 
8618 034164 100047 BPL mee) IF DATA SET CHANGE IS NOT SET BR 


8619 034166 013737 011444 011442 MOV vane CMODS :MOV THE NEW MODEM STATUS IN 
8620 034174 042737 106760 011442 BIC yr e7eO. CMODS 
8621 034202 032777 000040 155214 BIT #TM, aTXCSR 
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DEVICE INTERRUPT SERVICE ROUTINES 


RXIN2: 


GLINC: 
RXIN1: 


RXIN21: 


RXING: 


RXIN6: 


CMP TEMPS , TEMP3 
GL 7+ 


MHRCNT 
MOV #HRDMSG , TEMP2 
RXIN1 


BR 

INC MGL CNT 

MOV #GLMSG, TEMP2 
JSR PC,LOGMSC 
MOV CMODS ,MODS 


‘TEST FOR STATUS OR DATA 


BIT #RSTARY!RDATRY, Saat 


BEQ RX INEX 

MOV @RDSR, IRDSR 

BIT #RDATRY, IRXCSR 
RXIN3 


;GET HERE WITH GOOD DATA 


MOV RMSGPT ,R2 
MOVB IRDSR, (R2)+ 
MOV R2,RMSGPT 


DEC RMSGCC 
BNE RX INEX 
BIT #BCC.FLAG 
RX INS 
BIT #RERR, IRDSR 
RX IN6 
MOV IRDSR, TEMP3 
MOV IRXCSR, TEMP4 
MOV #DVEM3 . TEMP2 
JSR PC,LGDVE 


INC ERRCNT 
ERRSOFT 8,DVEM3,ERR13 


BR RXIN8 

BIS #BCC,FLAG 
MOV #2. ,RMSGCC 
MOV #BCCW,RMSGPT 
BR RX INEX 
STATUS CHECK - 


zIF TEST MODE SET 
:SET IT IN NEW STATUS 


COMPARE OLD TO CURRENT 
INC GLITCH COUNT 

INC HARD COUNT 

SET UP HARD MESG. 


INC GLITCH COUNT 

:SET UP GLITCH 

7GO LOG MODEM STATUS CHANGE 
SMOVE CURRENT TO OLD 


NEITHER EXIT 


:1S THIS DATA 
;1F NOT GO TO 3 


;STORE DATA AWAY 
;PUT POINTER BACK 


:GET OUT IF NOT ALL DONE 
31S THE BCC FLAG ALREADY SE 


BRANCH IF YES. 
+ THE ERR CHK BIT SET INDICATING 


OOD BCC 
BRANCH IF GOO 


TRAP mas 


- WORD 
«WORD DVEM3 
«WORD ERR13 


:DISABLE INTERRUPTS AND EXIT 


7SET FLAG 
SET THE COUNT TO 2 
:SET POINTER TO BCC WORD 


SEQ 0146 
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CVCLHB.P11 15=JUN-81 15:48 DEVICE INTERRUPT SERVICE ROUTINES 
8674 034464 032737 002000 011444 RXIN3: BIT ARSTARY,IRXCSR ;1S THIS A STATUS INT. 
8675 034472 001454 BEQ RXINEX sEXIT IF NOT 
Bor? :LOG OVERRUN ERROR 
8679 034474 012737 016737 006534 MOV ADVEMG , TEMP2 
8680 034502 013737 011446 006536 MOV IRDSR, TEMP3 
8681 034510 013737 011444 006540 MOV IRXCSR, TEMP4 
8682 034516 004737 017652 JSR PC, LGDVE 
8683 034522 005237 006502 INC ERRCNT 
8684 034526 ERRSOFT 9,DVEM4,ERR13 
(4) 034526 104457 TRAP — CSERSOFT 
(5) 034530 000011 .WORD 9 
(5) 034532 016737 “WORD DVEM4 
(5) 034534 017326 “WORD ERR13 
5 034536 000424 BR RXIN7 
8687 034540 032737 000040 006574 RXINS: BIT #ARXM, FLAG :1S THE RX M BODY BIT SET 
8688 034546 001020 BNE RXIN7 :IF YES THEN ALL DONE 
8689 034550 052737 000040 006574 als #RXM, FLAG 
8690 034556 042737 000400 006574 BIC #BCC FLAG :CLEAR BCC AND SET RXM 
8691 034564 013737 006464 011460 MOV DVRXA,RMSGPT | :MOVE ADDRESS TO POINTER 
8692 034572 013737 002660 011462 MOV RHDMCC,RMSGCC :MOVE THE CHAR COUNT IN 
8693 034600 013737 002660 006466 MOV RHDMCC , DVRCC ‘SET THE CC TO AMOUNT IN HEADER 
8694 034606 000406 BR RX INEX ‘AND FINISH. 
8695 ee ee aia 
8696 034610 052737 000004 006574 RXIN7: BIS #ORX, FLAG :SET FLAG BIT 
8698 034616 042777 000120 154572 RXIN8: BIC ARINTEN+RXENA,@RXCSR —s; CLEAR_INTAND RX ENABLE 
RXINEX: 
ENDSRYV 


L10020: 
RT 
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\eeatene P11 15=JUN-81 15:48 DEVICE TRANSMIT INTERRUPT ROUTINE 
ae ~SBTTL DEVICE TRANSMIT INTERRUPT ROUTINE 
8771 p++ 
8712 : FUNCTIONAL DESCRIPTION: 
tay 3 DEVICE TRANSMIT INT. ROUTINE 
8715 : WHEN A TRANSMIT BUFFER EMPTY CAUSES AN INTERRUPT TO OCCUR 
8716 * : THE PROGRAM COMES TO THIS ROUTINE. 
8717 3 IF THE SYNC COUNT''SYNCC’’ IS NON ZERO TSOM IS SET 
8718 . A SYNC CHAR IS LOADED TO TDSR AND THE SYNC COUNT IS 
1ah ; DECREMENTED. 
8721 : IF THE SYNC COUNT IS ZERO TSOM AND TEOM ARE RESET 
8722 . ‘ AND THE ‘PAD'' BIT IN FLAG WORD IS CHECKED IF IT IS 
8723 Z SET THEN A PAD(377) CHAR IS LOADED TO TDSR AND TX 
a75¢ ; INTERRUPT ENABLE IS CLEARD. 
8726 : IF THE SYNC COUNT IS ZERO AND THE ‘PAD'’ FLAG IS 
8727 é CLEAR THEN A BYTE IS PUT IN TDSR FROM THE ADDRESS 
356 F IN MSGPTR AND THE MSG COUNT IS DECREMENTED 
8730 : IF THE MSG CGUNT GOES TO ZERO THE ‘‘TXM’’ BIT IS 
8731 ; CHECKED IF IT IS SET THE ‘PAD'’ FLAG IS SET 
8732 ; IF IT IS CLEAR THEN IT GETS SET AND MSGPTR IS 
8733 ' LOADED WITH THE ADDRESS OF TXBUFF AND THE MSG 
8734 ; COUNT IS LOADED WITH THE COUNT OF THE MSG TO 
8735 3 BE TRANSMITTED. 
8736 : 
8737 : INPUTS: 
8738 ; MSGPTR = IS SET 70 THE ADDRESS OF THE MSG OR HEADER TO BE TX'D 
8739 3 MSGCC = IS SET TO THE COUNT OF MSG TO BE TX'D 
8740 ; OUTPUTS: 
8741 3 QTX = THIS BIT IS SET WHEN MSG IS TX'D OK. 
8742 = 
8743 
8744 034626 BGNSRV DVTX] 
(3) 034626 DVTXI:: 
8745 034626 005737 011454 TST SYNCC ZANY SYNCS TO SEND 
8746 034632 001406 BEQ TXIN1 :IF NOT GO TO 1 
8747 034634 013777 011456 154564 MOV SYNCW,@TDSR TELSE SET TSOM AND SYNC WORD 
8748 034642 005337 011454 DEC SYNCC :DEC SYNC COUNT 
8749 034646 001056 BNE TXINEX ;I1F NOT ZERO EXIT 
8750 034650 042777 001400 154550 TXIN1: BIC STC ON, FSOR. aTDSR 
8751 034656 032737 001000 006574 BIT #PAD ,FLAG ils THE PAD BIT SET 
8752 034664 001412 BEQ TXIN TO 2 IF NOT SET 
8753 034666 012777 000377 154532 MOV #377, aTDSR ‘CORD FF TO TX DATA REG. 
8754 034674 042777 000100 154522 BIC MTINTEN,@TXCSR ;CLEAR TX INT ENABLE 
8755 034702 052737 000010 006574 BIS #QTX FLAG SET THE TX COMPLETE IN FLAG 
8756 034710 000435 BR TXINEX AND EXIT 
8757 034712 013702 011450 TXIN2: MOV MSGPTR,R2 LOAD R2 WITH TX ADDR. 
8758 034716 112277 154504 MOVB (R2)+,aTDSR “LOAD DATA BYTE 
8759 034722 010237 011450 MOV R2,MSGPTR ;RESTORE POINTER 
8760 034726 005337 011452 DEC MSGCC DEC cc 
8761 034732 001024 BNE TXINEX 
8762 034734 052777 001000 154464 BIS #TEOM,aTDSR 
8763 034742 032737 000020 006574 BIT #TXM,FLAG 71S THIS THE END OF DATA MSG. 
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/CVCLHB.P11 15=JUN-81 15:48 DEVICE TRANSMIT INTERRUPT ROUTINE 
8764 034750 001012 BNE TXINS ;IF SO SET THE PAD BIT 
8765 034752 052737 000020 006574 BIS #TXM,FLAG IF NOT MUST BE yi OF HEADER 
8766 034760 013737 006450 011450 MOV DVTXA,MSGPTR ;SO SET UP MSGPTR FOR MSG 
8767 034766 013737 006452 011452 MOV DVTCC ,MSGCC SAND THE CC FOR MSG. 
8768 034774 000403 BR TXINEX 
far 034776 052737 001000 006574 TXIN3: BIS #PAD,FLAG SET THE PAD BIT 
8771 035004 TXINEX: 
8772 035004 ENDSRV 
(2) 0350046 900002 


(3) 035004 L10021: 
RTI 
| 





r--- 


| CVCLHB.P11 


035006 
035014 
035022 


035030 


035124 


042737 
012737 
013737 


052777 


7 
032737 


000004 
002657 
002654 


000160 


006640 
000019 
035310 
000004 


CVCLHB DPV=11 DATA COMM, LINK TEST 
15=JUN=81 15:48 


006574 


006574 


12 
MACY11 30A(1052) 16-JUN-81" 10:00 PAGE 13-34 


-SBTTL 


Be Be Be Be Be Be 


DVIN31: 


DVIN32: 


DVIN3S: 


INPUTS: 


SUBORDINATE ROUTINES USED: 
“"CLRRTS"* 

CALLING SEQUENCE : 

* YSR 

RETURN 


DEVICE TRANSMIT CONTROL MSG 
DEVICE TRANSMIT CONTROL MSG 


+ 
FUNCTIONAL DESCRIPTION: 


THIS ROUTINE DOES THE FOLLOWING 
QUES A RX SPACE AT RHDMSC+1 
QUES A TX MSG FROM HDMSG+1 
CHECKS FOR A TIMER EXPIRED 

IF EXPIRED RETURN TO CALLER 


ELSE RECHECK TIMER AND TX COMPLETED UNTIL 
EITHER TX COMPLETE OR TIME OUT 

IF TX COMPLETE AND RX NOT COMPLETE THEN 
REQUE TX MSG. 

ELSE IF RX COMPLETE RETURN. 


1 XM - SET IN FLAG WORD 

HDMSG+2 - TYPE OF CONTROL MSG.. 

- CLEAR REQUEST TO SEND IF HALF DUP. 
PC ,DVIN31 

RETURN TO CALLER IF SOMETHING RX'D OR TIMER OUT. 


BIC #QRX ,FLAG 


MOV #RHDMSG+1 ,RMSGPT 
MOV HDMC ,RMSGCC 


;CLEAR RX COMPLE. 

;SET UP POINTER 

sAND CC 

ENABLE RCVR. 

BIS #RINTEN! RXENA! DSITEN,@RXCSR 

SET UP TXMITTER TO SEND 

JSR PC,CTSSR sSET RTS . 

BIC #QTX!PAD, FLAG ;CLEAR TX COMPT FLAG. 

MOV #HDMSG+1 ,MSGPTR :MOVE THE CURRENT POINTER TO MSGPTR. 


MOV HDMC ,MSGCC 
MOV #8. ,SYNCC SET UP SYNC COUNT 
BIS #TXENA! TINTEN, @TXCSR 


NOW WAIT FOR TIME OUT OR TX COMPLETE 


BREAK 
TRAP C$BRK 


TST TIMERS :1S IT TIMED OUT 
BEQ  DVIN34 TIF YES EXIT 

BIT #OTX, FLAG *1S TX DONE 

BEQ DVINSS *1F NOT GO BACK AND CK TIME OUT 
JSR PC, CLRRTS *GO CLEAR RTS IF NESC, 

BIT MORK, FLAG “DID WE RX ANYTHING 


SEQ 0150 


c--— - i —_— -_—_——— 


| 


I 12 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN=81 10:00 PAGE 13-35 SEQ 0151 
CVCLHB.P11 15=JUN=81 15:48 DEVICE TRANSMIT CONTROL MSG 


| 8829 035132 001741 BEQ DVIN32 ;1F NOT RETRANSMIT LAST 
| 8830 035134 000207 DVIN34: RTS PC TRETURN TO CALLER 


CVCLHB DPV=-11 DATA Sa tl TEST 
CVCLHB.P11 


035136 
035144 


035146 


03 
035240 


035242 


15=JUN=81 


022737 
001460 


032737 
14 


748 


000001 


006564 


006574 
006530 


006574 
154202 
006634 


154164 





J 12 
MACY11 30A(1052) 16=JUN=81_ 10:00 PAGE 13-36 
DEVICE RTS TO CTS DELAY 


-SBTTL DEVICE RTS TO CTS DELAY 
"FUNCTIONAL DESCRIPTION 
CTSSR=-THIS ROUT INE SETS REQUEST TO SEND TO MODEM 
AND CHECKS FOR CLEAR TO SEND TO COME BACK 
- apt: DOFS NOT COME BACK BEFORE TIMER EXPIRES 
D ERROR IS REPORTED AND WE TRY AGAIN 
THE ROUTINE IS SKIPPED IF INTERNAL LOOP IS SET. 
; OUTPUTS: 
SUBORDINATE ROUTINES USED: 
“LGDVE"" - 
CALLING SEQUENCE: 
JSR 


LOG DEVICE ERROR 
PC,CTSSR 


CTSSR: CMP #1 ,.MLTYP :I1S THIS TTL LOOP 
BEQ DVTXRY ;BR IF YES 
sSET RTS AND WAIT FOR CTS 

DVTXR3: BIT #FIRST,FLAG 


BNE CTSS3 :IF NOT FIRST TIME SKIP DELY 
MOV #0, TEMP 
CTSS4: INC TEMP 
BREAK 
TRAP 
TST TEMP 
BNE CTSS4 :1F NOT ZERO GO BACK 
BIS #F IRST, FLAG ‘SET FIRST FLAG. 
CTSS3: BIS #RTS, ARXCSR SET REQUEST TO SEND 
MOV #1000.,TIMER1 :SET UP TIMER 
DVTXR2: BREAK 
TRAP 
BIT #CTS,@RXCSR :1S CLEAR TO SEND BACK 
BNE DVTXR1 “BR. IF CTS IS SET 
TST TIMER1 ‘ELSE TEST IF TIME EXPIRED 
BNE DVTXR2 ‘BR IF TIME NOT EXPRIED 
:SET ERROR FOR NO CTS 
MOV #DVEM1, TEMP2 
MOV @RXCSR. TEMPS 
MOV aTXCSR. TEMPS 
JSR PC,LGDVE 
INC ERRCNT 
ERRSOFT 6,DVEM1,ERR13 
TRAP 
. WORD 
- WORD 


BR DVTXR3 ; THEN TRY TO SET RTS AGAIN 


C$BRK 


C$BRK 


CSERSOF T 
6 


DVEM1 
ERR13 


SEQ 0152 


CVCLHB DPV=11 DATA COMM. LINK TEST 
CVCLHB.P11 15=JUN=81 15:48 


8883 
8884 


035306 
035306 000207 


MACY11 30A(1052) 


DVTXR1: 
DVTXRY: RTS 


K 
16=JUN=81 


12 
10:00 PAGE 13-37 


DEVICE RTS TO CTS DELAY 


PC 





SEQ 0153 


CVCLHB DPV=-11 DATA COMM, LINK TEST 
CVCLHB.P11 81 15:48 


035310 
035310 


035332 
0 


35340 


15=JUN= 


006566 


002000 
006534 


000004 


006534 


154056 





L 12 
MACY11 30A(1052) 16=JUN=81 10:00 PAGE 13-38 SEQ 0154 
DEVICE CLEAR REQUEST TO SEND 


. SBTTL DEVICE CLEAR REQUEST TO SEND 


* 
FUNCTIONAL DESCRIPTION: 
TH y vy hs eo) REQUEST TO SEND IF 


IN F DUPLEX 
CALLING SEQUENCE : 
JSR PC,CLRRTS 
CLRRTS: 
TST FHDPLX 31S THIS FULL DUPLEX 
BNE DVTRS sBRANCH IF YES 
MOV #2000, TEMP2 
CLRR1: DEC TEMP2 
BNE CLRR1 sDELAY A WHILE TO ALLOW CRC 
3:70 BE TXMITT'D BEFORE YOU 
BIC #RTS,ARXCSR ;CLEAR REQUEST TC SEND 
DVTRS: RTS PC ;RETURN TO CALLER 









M12 
CYVCLHB DPV-11_ DATA cm LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 13-39 SEQ 0155 
CVCLHB.P11 15=JUN=81 15:48 DEVICE CLEAR REQUEST TO SEND 


8918 
8919 -EVEN 
8920 
8921 035342 ENDTST 


(3) L10017: 
(3 


035342 
035342 104401 TRAP CSETST 





CVCLHB DPV-11 DATA st LINK TEST 
CVCLHB.P11 15=JUN=81 15:48 


8929 
8930 





MACY11 30A(1052) 


16=JUN-8 


iT 
DEVICE CLEAR REQUEST TO SEND 


00 


PAGE 13-40 


SEQ 0156 


CVCLHB DPV=11 DATA COMM. LINK TEST 


CVCLHB.P11 


035352 


035354 


035402 
035402 


035402 


15=JUN-81 15:48 


000016 


000130 
035402 
C00001 


001031 
035433 
160000 


177776 
002031 
035461 
000300 
000776 
006130 
035514 

- 000001 


052506 046114 042040 








13 : 
MACY11 30A(1052) 16=JUN-81 10:00 PAGE 13-41 SEQ 0157 
HARDWARE PARAMETER CODING SECTION 


.SBTTL HARDWARE PARAMETER CODING SECTION 


i ed 

; THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 

; THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
3; MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
: INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
; MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
; WITH THE OPERATOR. 


BGNHRD 
~WORD L10022-L$HARD/2 
LSHARD: : 
-SBTTL DEVICE INDEPENDENT SECTION 
GPRML DPLX,0,1.YES 
.~ WORD TSCODE 
WORD DPLX 
-WORD~ 1 
.SBTTL DEVICE DEPENDENT SECTION 
GPRMA CSRADR,2,0,160000,177776, YES 
.~WORD TSCODE 
WORD CSRADR 
WORD TSLOLIM 
.~ WORD TSHILIM 
GPRMA  VECTOR.4,0,300,776,YES 
-WORD TSCODE 
WORD VECTOR 
-WORD TSLOLIM 
-WORD TSHILIM 
GPRML RNODM,14,1,YES 
.~ WORD TSCODE 
~WORD RNODM 
-WORD 1 
END'MRD 
-EVEN 
110022: 
-NLIST BEX 


;DEVICE INDEPENDENT QUESTIONS 
DPLX: .ASCIZ /FULL DUPLEX OPERATION : / 


sDEVICE DEPENDENT QUESTION 


C 13 
CVCLHB DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) 16=JUN=81 10:00 PAGE 13-42 SEQ 0158 
CVCLHB.P11 15=JUN=81 15:48 DEVICE DEPENDENT SECTION 


8996 
yaad 4 035433 104 053 CSRADR: .ASCIZ /DEVICE CSR ADDRESS : / 


105 041511 : 
035461 111 052116 051105 VECTOR: .ASCIZ /INTERRUPT VECTOR os / 
8999 035514 042522 047515 042524 "ITEP" 


RNODM: - gasciz /REMOTE NODE ° 
- EVEN 





D 13 
CVCLHB DPV-11 DATA _ LINK TEST MACY11 30A(1052) 16-JUN-81" 10:00 PAGE 14 SEQ 0159 
CVCLHB.P11 15=JUN=81 15:48 DEVICE DEPENDENT SECTION 


9012 ;.SBTTL SOFTWARE PARAMETER CODING SECTION 


16 -+4 

; THE SOFTWARE PARAMETER CODING SECTION yer: MACROS 
; THAT ARE USED BY THE SUPERVISOR TO BUILD P=TABLES. THE 
; MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
: MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
; WITH THE OPERATOR. 


8 


x 


BGNSF T 


34 
9035 : ENDSFT 
36 


9047 Leacannassansaanaesestisacemmsesesécinsnssaieeee 


9049 035540 $PATCH: 
9050 035540 000030 -BLKW 30 


9059 035620_ Ze LASTAD 
(4) 035620 000000 -WORD 0 
(4) 035622 000000 «WORD 0 
(3) 035624 LSLAST:: 

9060 035624 ENDMOD 


9062 000001 - END 








CVCLHB DPV-11 DATA 4 LINK TEST . 
CVCLHB.P11 15=JUN=81 15:48 


ACT = 000003 42954 7121 7489 
ACTATV 030006 7283 74894 

ACTBCR 027612 7301 74544 

ACTCHK 030222 7263 75314 

ACTCLB 027134 7354 73684 

ACTCLP 030334 7297 75594 

ACTCLR 026624 7261 73154 
ACTCOP 027432 7271 74228 

ACTCRC 236 7292 75374 

ACTCSE 026760 7266 73404 

ACTCST 027052 7267 73564 

ACTDLL 030054 7287 75034 

ACTDME 027360 7303 7402 74054 
ACTDMQ 027352 7304- 74044 

ACTDMS 027330 7302 73994 

ACTDMX 027366 74064 

ACTECH 030132 7291 75204 
ACTEQO 027554 7275 74434 

ACTEXT 026710 7307 73284 

ACTHLP 026644 7265 73214 

ACTLIS 030044 7286 75004 

ACTLLP 030344 7298 75614 

ACTLPX 030362 7556 7558 7560 
ACTLXX 030424 7529 7550 7553 
ACTMEX 7436 7452 7469 
ACTME1 027734 7458 7460 7462 
ACTMOP 03031¢™"° 7295 75554 

ACTMOS 030244 73 75404 
ACTMSO 027634 7276 74574 

ACTMS1 027642 7277 74594 

ACTMS2 027652 7278 74614 
ACTMS3 7662 7279 74634 

ACTMS4 027672 7280 74654 

ACTMSS 027702 7281 74674 
ACTMS6 027720 7282 74704 

ACTM2x 030102 7490 7498 7501 
ACTNO 030122 7290 75174 

ACTNUF 026614 7300 73124 

ACTNUL 026622 7260 73134 
ACTNUM 027442 7272 74254 
ACTOPM 027534 7273 74384 

ACTPAS 039016 2 74924 
ACTPRO 030252 7293 75434 

ACTPRT 026720 7305 73314 
ACTQFG 030256 7532 7535 7538 
ACTREC 030036 7285 74978 

ACTREX 020704 5950 59654 

ACTRHL 0640 949 5957# 
ACTRLG 020714 5951 59694 
ACTRLP 030354 7299 75634 

ACTRNL 020636 5948 59544 

ACTRPS 030304 7296 75524 
ACTRUN 026734 7264 73354 
ACTSEX 027744 73 747784 
ACTSHO 026634 7262 73184 
ACTSHW 027174 7346 7360 7379 


MACY11 30A(1052) 
CROSS REFERENCE TABLE == USER SYMBOLS 


7565 


7504 


7541 


7391 


E 
16-JUN-81 


7803 


75654 
75704 
7480 
7466 


7507 


75454 


7483 
74738 


75114 


13 
10:00 PAGE 15 


74854 


SEQ 0160 





F 13 
CVCLHB DPV=-11 DATA +. LINK TEST MACY11 30A(1052) 16=JUN=81 10:00 PAGE 15-1 SEQ 0161 


CVCLHB.P11 —-15=JUN-81 15:48 CROSS REFERENCE TABLE == USER SYMBOLS 
ACTSTE 027374 7268 «83-7412 

ACTSTS 030230 7274 7534 

-ACTSTT 027406 7269 «74158 

ACTSTX 027412 7413 2416 

(ACTSZE 027422 7270 74198 

ACTT 74 7289 75098 

LACTILP 030324 7296 = 75578 

FACTTRA 030064 7288 7506" 

|ADDCC 022136 6190" 7203 7233 

ADDC1 022232 6192 6202# 

ADR = 000020 G 42784 

ALCK. 031032 4760 77128 

ALCK1 031144 7768 «©7777 = 7823 

ALCK2 031210 7778 «= 7787# = 7855 

ALCK2A 031430 7820 78254 

ALCK3 031454 7790 7827 = 7830" 

ALCK3A 031546 7837 = 78438 

ALCK3B 031560 7844 78464 
lALcK3C 031554 7841  7845# 7852 

ALCK4 021602 7831  7850# 

ALCK4A 031610 7849 78534 

ALCK4B 031622 7854 7856 

ALCKS 031074 2767" = 7845 

ALLTR 031074 7641 7665 7690 7717 77664 
ASSEMB= 000010 4030 

ATVMOD= 000027 44324 4905 

006551 4729" 5504 7928« 

BADCHR= 000051 44504 5020 

BASM1 015173 53364 6150 

BASM2 015164 5335#@ 6156 

BASM3 015155 5334" 6154 

BCC = 000400 43864 8418 8421 8653 8667 8690 
BCCW 011464 5114 8669 

BDCLK 013712 S297# 6826 

BITO = 000001 G 42784 4315 = 4364. 4504 

BITOO = 000001 G 42784 

BITO1 = 000002 G 4278# 

BITO2 = 000004 G 42784 

BITO3 = 000010 G 42784 

BIT04 = 000020 G 4278# 

BITOS = 090040 G 42784 

BIT06 = 000100 G 42788 

BIT07 = 000200 G 42784 

BITO8 = 000400 G 42784 | 

BITO9 = 001000 G 4278# 

BIT] = 2G 4278# 4316 «= 4365. 4497-4505 
BIT10 = 002000 G 42784 4390 4502 

BIT11 = 004000 G 4278# 4392 = 45038 

BIT12 = 010000 G 42784 4481 

BIT13 = 020000 G 42784 4479 

BIT14 = 040000 G 42784 4483 

BIT15 = 100000 G 42784 4512 = 4513 

BIT2 = G 42784 4317 «4366 4482 4506 
BIT3 = 000010 G 42784 4318 4367 = 4507 

BIT4 = 000020 G 42784 4319 «4382, 4498 = 4508 
BITS = 000040 G 4278# 4320 «4384 4484 4485 4499 8374. = 8375 8377 








G 13 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052)_ 16=JUN-81 10:00 PAGE 15-2 SEQ 0162 


_ CVCLHB.P11 15=JUN=81 15:48 CROSS REFERENCE TABLE == USER SYMBOLS 

,BIT6 = 000100 G 42784 4368 4500 4509 

BIT? = 000200 G 42784 4369 4501 7602 7605 

,BIT8 = 000400 G 42784 4386 4510 

BIT9 = 001000 G 42784 4388 4480 4511 8279 

BLDBEX 022344 6247 62514 

BLDBUF 022234 62204 7112 7119 7204 7234 7375 7614 
tac? 022244 62344 

BLDB2 22306 62424 6249 

BLOBS 022324 62454 6250 

= 00 G 42784 ' 

BUFEX 014057 53004 7187 7216 

BUFLIM= 001000 42834 4673 4674 4675 6191 6198 6320 7185 7214 7368 7610 
BYTBIT 006510 47084 6151 7400* 7404* 

CABLE = 000092 43024 8254 

CBLLOP= 000045 44464 5049 

CCURAD 006446 46884  6332* 6340 6344* 7108* 7116 7232 7237* 7353* 
CHECK = 000003 44124 4953 

CLEAR = 000001 44104 4891 7178 7315 

CLIACT 026434 7148 72528 

CLIALN= 0C0007 44034 

CLIALP= 000006 44024 4939 4949 5023 

CLIBCR 911775 52024 7456 

CLIBDL 011670 52004 7569 

CLIBIF= 3 43994 

CLIBR = 000002 43984 4888 4890 4892 4895 4897 4906 4908 4910 4912 4914 4917 4919 


5059 
CLIBRX 011650 51994 6570 
CLIDEC= 000071 44054 5032 5058 
CLIERM 011553 51964 5913 7153 
CLIERR= 000000 43964 4898 5020 5939 
CLIEXI= 000001 43974 4880 4882 4884 4886 4925 4927 5064 5932 5934 5936 5938 5940 
CLINBG 011626 51984 6608 
CLINPS 011732 52014 7525 
CLINUF 011603 51974 5918 7157 
CLINUM= 000005 44014 
CLIOCT= 10 44044 4941 4943 
CLIPW 012073 52044 7582 
CLIRAC 020610 5908 59434 
CLIRT 020522 5907 59304 
CLISEO 012042 52034 7429 
CLISPA= 000004 44 4878 4902 4923 4932 4940 5017 5930 
CLISTR= 000012 44064 4881 4883 4885 4887 4889 4891 4894 4896 4903 4905 4907 


4909 
4964 4966 4983 
4987 4990 4997 4999 5001 5003 5005 5007 5009 5011 5025 5027 5047 


CLITRE 007706 48754 7147 

CLISPM 011540 51944 7145 

CLISRP 011546 51954 

L 47684 6821* 

CLKCSR 006614 4767# 5709* 5730* 6802 6812* 6813* 6814* 6822* 6951* 7080* 
CLKEN 006624 47714 5730 6806* 6815* 6822 7080 

CLKHZ 006622 4770# 5712 5727 5866 6823 6830 

CLKINT 017446 G 5707# 6880 


CLKSET 017422 56624 6805 6811 








CVCLHB.PT 

mat 006620 
/CLRRTS 035310 
CLRR1 035324 
CMDBUF 002666 
CMODS 011442 
CMPBUF 005144 
CMPPTR 006440 
CMPSEX 032076 


CMPTOT 006442 
CMSGO = 20 
CMSG1 = 0C0021 
CMSG2 = 000022 
CMSG3 = 000023 
CMSG4 = 000024 
CMSGS5 = 000025 
CMSG6 = 000026 


CPTRR 006516 
CR 016226 
CRC = 000040 
CRCB = 000020 
CSHEXP= 000006 
CSHTRN= 7 
SRADR 035433 


000006 
C$CVEC= 000036 


15=JUN=81 15:48 


CVCLHB DPV=11 DATA COMM. LINK TEST 


s 


H 13 
MACY11 30A(1052)_ 16=JUN=81 10:00 PAGE 15-3 
CROSS REFERENCE TABLE == USER SYMBOLS 


79334 
6338 


6347* 


6344 
8813 


6241 
6200* 
7610* 


8311 


7120* 


7115* 
7784* 
7715* 


6345* 
88524 


6251* 
6201 


8521 


8634 


6342* 
7896 


7220* 


6350* 


7110* 
6235 


8822 


6346* 


7223 


7205 
7846* 
7774* 


7098* 


7116* 
6240 


8862 


7103* 


7236* 


7231* 
7853 
7802* 


7213 


720e* 
6251 


8868 


7115 


7343 


7235 
7895* 
7807 


7218 


7207 
7106* 


7222* 


7347* 


7238* 


7232* 
7118* 


7230* 


7580 


7364* 
7904* 
7829* 


7348* 


7237 
7371* 


7231 


7591 


7369* 
7432* 


SEQ 0163 


7235* 


7640* 
7896* 


7611* 
7445* 


poate Oe a ee a 


I 13 
| CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 15-4 SEQ 0164 


PCVCLHB.P11 = 15=JUN-81 15:48 CROSS REFERENCE TABLE -= USER SYMBOLS 
| CSDCLN= 000044 4030" 6785 
C$DODU= 000051 40304 
C$DRPT= 000024 40304 
C$DU = 000053 4030# 7007 
C$EDIT= 000003 4030# 4116 
CSERDF= 000055 40304 
CSERHR= 000056 40304 
CSERRO= 000060 40304 
CSERSF= 000054 40304 
CSERSO= 000057 4030# 7916 7930 7939 7979 8242 8275 8333 8532 8663 8684 8881 
C$ESCA= 000010 40304 
CSESEG= 000005 40304 
= 000003 4030 
CSETST= 000001 40304 8921 
CSEXIT= 000032 4030# 6896 6955 7137 7176 
C$GETB= 000026 40304 
C$GETW= 000027 40304 
CSGMAN= 000043 40304 5905 6823 7145 8066 
C$GPHR= 4030# 6843 
C$GPLO= 000030 40304 
= 0 4030# 
CSINIT= 000011 40304 6912 
CSINLP= 000020 40304 
C = 000050 40304 7133 
C$MEM = 000031 4030# 
C$MSG = 000023 4030# 5505 5509 5513 5517 5536 5545 
CSOPEN= 40304 
C$PNTB= 000014 4030# 5504 5508 5512 5516 5535 5544 
CSPNIF= 000017 4030# 5859 5862 5899 5913 5918 5958 6150 6154 6156 6196 6570 6608 


6826 7089 7126 7153 7157 7187 7196 7216 7226 7322 7388 7429 7454 


CSPNTS= 000016 40304 5996 6014 6019 6025 6032 6033 6049 6057 6064 6083 6086 6101 
6116 6390 6428 

CSPNTX= 000015 40304 

C$Q10 = 000377 40304 

C$RDBU= 4030# 6818 

CSREFG= 000047 40304 6788 6790 6792 6795 

C$RESE= 000033 40304 6953 

C$REVI= 000003 40304 4116 

C$RFLA= 000021 40304 

C$RPT = 000025 40304 6718 

CSSEFG= 000046 40304 

C$SPRI= 000041 40304 6895 6952 

C$SVEC= 000037 40304 6880 6892 6893 

C$TPRI= 000013 40304 

DATCKB= 000002 43164 6398 7531 7578 7660 7799 7848 7893 8061 8115 

DCD == 010000 44814 4798 

DCK = 000014 43464 5804 

DCLFLG 006556 47364 6782 6784* 7175* 

DDE = 000022 43594 5812 

DER = 000010 43444 5790 

DEV1 007676 48544 6030* 6033 6036* 6038* 6379 7127" 7392s 

DEV2 007700 48554 6031* 6033 6037* 6039" 6382 7128* 7393 

DEV3 007702 48564 6040* 6389 7129* 7394s 


DEV4 007704 4857# 6041* 6394 6398 6402 6423 7130* 7395s 
DFPTBL 002130 G 41544 








CVCLHB DPV-11 DATA os it TEST 


CVCLHB.P11 

| DIAGML= 000000 
[DIVN9T 033322 
DLE = 000020 
DLL 032216 
DLLCM 013632 
DLLMOD= 000033 
DMPE = 000053 
DMPG = 000054 
DMPS = 000052 
DMSGAD 002172 
DMSGCT 002150 
DOW = 

DPLX 035402 
DPV 

DPVP1 011440 
DSITEN= 0 
DSR = 001000 
DIR = 2 
DUMEX 022134 
DUMPSR 022 
DUM! 022072 
DUM2 022114 
DUMS 022030 
DUM4 022004 
DVEMO 6441 
DVEMI 016520 
DVE 16602 
DVEMS 016677 
DVEM4 016737 
DVEMS 017003 
DVE 017067 
DVI = 000012 
DVINEX 033460 
DVINIT 032672 
DVIN1 032754 
DVIN3 033010 
DVIN3A 033034 
DVIN31 035006 
DVIN32 035036 
DVIN34 035134 
DVIN3S 035100 
DVIN37 033142 
DVIN38 033050 
DVIN39 033122 
DVING 033232 
DVIN41 033212 
DVINS 033344 
DVIN81 033406 
DVIN9 033252 
DVMEX 033534 
DYMODS 033502 
DVRCC 66 
DVRCT 70 
DVREX 033644 
DVRXA 006464 
DVRXI 034132 G 





15=JUN=81 


86114 


7169 
8258 


7605* 
8809 


MACY11 30A(1052) 
CROSS REFERENCE TABLE == USER SYMBOLS 


7401 


8281 


8310 
8335 


83284 


8119* 
7801* 


8117* 


J 13 
16=JUN=81 10:00 PAGE 15-5 


8321 


8130 
7805* 


8129 


83374 


8132* 8133* 8424" 8693+ 
7825* 7826 7897* 7942+ 


8132 8422 8691 


| K 13 
| CVCLHB DPV-11 DATA a LINK TEST MACY11 30A(1052)_ _16=JUN=81 10:09 PAGE 15-6 SEQ 0166 


CVCLHB.P11 15-JUN=81 15:48 CROSS REFERENCE TABLE =~ USER SYMBOLS 
DVRXQ 033544 7775 8124 84144 
DVRX2 033622 8420 84294 
DVRX3 033636 8425 84314 
DVTCC 006452 46914 7783* 7833 8077* 8085 8508 8514 8767 
DVTCT 006454 46924 7662* 7686* 7712* 7835* 7840 7843 
DVTREX 034130 8539 8545 85504 
DVTR1 33722 8505 85124 
DVTR2 033752 8509 85164 
DVTRS 766 8501 85194 8533 
DVTR4 034074 8536 85414 
DVTRS 35340 8898 89044 
DVTR8 033774 85214 8542 8548 
DVTXA 006450 46904 7781* 7832 8074* 8084 8507 8766 
DVTXI 034626 G 6893 87444 
DVTXRX 033646 7787 8082 8127 85004 
DVTXR1 035306 8870 88834 
DVTXR2 035222 88684 8872 
DVTXR3S 035146 88584 8882 
DVTXRO 035306 8854 88844 
ECHO = 000037 44404 4966 
ECHOB = 000004 4317# 6402 7511 7522 7527 7794 
EDDCK 014747 4824 53264 
EDDDE 015062 4827 53294 7930 7939 
EDDER 014732 4822 53254 
EDDLE 015025 4826 7916 
EDDVI 014777 4823 53274 
EDEOP 3 015115 4828 53304 
S 015131 4825 53314 
EDRXC 014704 4821 53244 
EDRXQ 014657 4820 53234 
EDTXC 014630 4819 53224 
EDTXQ 014604 4818 53214 
EFM11 014404 53144 5512 
EFM13 014533 53164 5516 
EFM2 014307 53124 5508 
EF .CON= 000036 G 42784 6792 
-NEW= 000035 G 42784 6795 
EF .PWR= 000034 G 42784 
EF .RES= 000037 G 42784 
EF .STA= 000040 G 42784 6788 
EMSGO 002215 4528 45524 
EMSG1 (92216 4529 45544 
EMS 002¢17 4530 45564 
EMSGS 002220 4531 45584 
EMSG4 2320 4532 45644 
EMSGS 002412 4533 45694 
EMSG6 0025135 4534 45734 
EMSG8 + 002643 4536 45874 
ENADD 006506 4707# 6157 7405* 
ENDEVT 021656 5997 6007- 6011 60924 
ENDIT 024714 6794 68794 
ENDPS 032136 7974 80014 
ENDQO = 17 44244 5015 
a 24 436 5816 


EOP 0000 Ow 
ERRCNT 006502 47054 5839 sees 7597" 7915*  7929% 7938* 7978* 8005 8241* 8274+ 8332* 38531" 


O« 





re 


L 13 
CVCLM® DPV=11 DATA COMM. LINK TEST MACY11 30A(10S2)  16-yUN-81" 10: 00, PAGE 15-7 SEQ 0167 
CVCLHB.P11. -15=JUN=81 15:48 CROSS REFERENCE TABLE -- USER SYMB 
ERR1 017154 G 5503# 7930 
ERRIO 017244 G 5511" 7916 
ERR13 017326 G 5534" 82462 8275 8333 8532 8663 8684 8881 
ERR1G 017360 G 55434 
ERR2 017216 G 55074" 7939 
ERRG 017274 G 55154 7979 
ERX = 000100 £3684 67639 «7689'S 7716~=S 7821S 7839=S «8121 ~—s« 8538 
ETX = 000200 43694 7663 7716 7822 7838 8079 8091 8544 
EL = G 42784 
EVMCTS 016171 4807 -5367# 
EVMDCD 016201 4809  5369# 
EVMDSR 016175 4808 53684 
EVMOCG 016051 53604 6086 
E 016074 5365# 6101 
EVMOST 016154 5 6116 
016211 4811 53718 
EVMRTS 016205 4810 
EVMSQD 016215 4812 53728 
EVMIM 016221 4818 53734 
EVTADD 007642 GB35H# 6022 6025 6046 6049 6054 6057 6061" 6064 
EVTBCT 007644 GB36H ©6023 6025 6047 6049 6055* 6057 6062" 6064 
EVTEND 007546 47854 5874 6004 6834 
EVIFO 015241 33a" 6014 
EVTF1 015335 5339" 6019 
EVIF2 015 5340" 6025 
EVIFS 015436 5341# 6032 6083 
EVTF3C 015450 S342" 5535 6033 
EVTF3D 015465 534 5544 
EVTF4 015507 53444 6057 
EVTF4A 015611 53454 
EVIF4B 015707 6049 
EVIFSA 015766 53584" 5504 
EVTLOG 006644 4783 47844 5878 5994 6002 6831 
EVILST 007606 48184 6019 
EVTMIN 007636 48334 6018* 6019 
EVTPTR 006642 47834 5864  5879* 5993 6009 6832s 
EVTSEC 007634 48324 6017* 6019 | 
EVTTCK 007640 48344 6016* 6019 
EVTIMP 007646 4837# 6029* 6032 6048 6049 6056" 6057 6063* 6064 6082* 6083 
EXIT = 000057 4456# 4885 7173 7328 
ESEND = 002100 40304 
2 35 40304 4116 
FACSIM 022260 63144 7481 
HDPLX 566 7444 6846* 8284 8897 
FIRST = 004000 43924 8858 8865 . 
FLAG 006574 4754H ©7594 -7639% «7663 «—7689* + «-7716* «= 7767—Ss«7777~—Ss«7?789~—Ss7B21* «= 7B22* ~=—-7B2B* «7830 
7838  7839* 7847 8079* 8091* 8121 8247* 8289% 8303" 8309 8338" 8339* 8415 
B418* 8421" 8500 8502* 8506" 8535 8538 8541 8544 8547 8615 8653 8667* 
8687 8689+ 8690» 8696+ 8751 8755* 8763 8765" 8769* 8803" 8814" 8825 8828 
ca 
= 000015 4030# 7017 7044 
F$AUTO= 000020 40304 6923 6932 
F$BGN = 000040 4030# 4051 5508 5507 5511 5515 5534 5543 5547 S707 6686 6727 6756 
6923 6941 6955 6980 6991 7017 7028 7070 7137 7176 8611 «8744 


4 9060 
FSCLEA= 000007 40304 6941 6971 





M 13 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11_ 30A(1052) 16-JUN-81" 7 Ds + I 15-8 SEQ 0168 


CVCLHB.P11 15=JUN=81 15:48 CROSS REFERENCE TABLE == USER S 

FSDU = 000016 40304 6980 7007 

FSEND = 000041 40304 4051 5505 5509 5513 5517 5536 5545 5547 5721 6718 6896 6912 
6932 6955 6971 6991 7007 7028 7044 7070 7137 7176 8701 8772 8921 
8979 9060 

F D= 000004 40308 8944 8979 

= 000013 40304 4154 2 

FSINIT= 000006 40304 6756 6912 

SJMP = 000050 40304 5547 6896 6955 6991 7028 7137 7176 

FSMOD = 000000 40304 4051 9060 

FSMSG = 000011 40304 5503 5505 5507 5509 5511 5513 5515 5517 5534 5536 5543 5545 

FSPROT= 000021 40304 6727 6733 

FSPWR = 000017 40304 

FSRPT = 000012 40304 6686 6718 

FSSEG = 000003 40304 

FSSOF T= 000005 40304 

FSSRV = 000010 40304 5707 5731 8611 8701 8744 8772 

FS$SUB = 000002 40304 

F$SwW = 000014 40304 

FSTEST= 000001 40304 7070 8921 

GETCL 025460 7134 71434 7154 7158 7161 7163 7165 7172 7179 7181 7188 7197 —- «7211 
7217 7227 7241 7583 

GETTRM 024530 6797 6839# 6844 

GETRCL 020330 59014 5914 5919 5923 

GLINC 034260 8627 86314 

GLMSG 016363 53984 

550 47284 7927* 

GTRA2 025100 70834 

GTRAS 025142 7086 70914 

GTRA4 025150 70964 

GTRAS 025374 7092 71274 =§=8013 8038 

GTREX 030534 75944 

GTRX2 030636 76104 8012 8093 8140 

GTR9 030432 7139 7168 75764 

GTXRXB 025100 70824 

GSCNTO= 000200 4030# 

GSDELM= 000372 40304 

G$D1SP= 000003 40304 

GSEXCP= 000400 40 

GSHILI= 000002 40304 

G$LOLI= 000001 40 ) 

G$NO = 000000 40304 5905 7145 8066 

GSOFFS= 000400 40304 5905 6823 7145 8066 8958 - 8975 8976 8977 

GSOF SI= 000376 40304 5905 6823 7145 8066 8958 8975 8976 8977 

GSPRMA= 000001 4030# 75 8976 

GSPRMD= 000002 40304 905 3 7145 8066 

GS$PRML = 0304 8958 8977 

GS$RADA= 000140 40304 5905 7145 8066 

G$RADB= ' 40304 

GS$RADD= 40304 6823 

GSRADL= 000120 40304 8958 8977 

20 40304 8975 8976 
GSXFER= 4030" 















CVCLHB.P11 
HELP = 000000 


eye 
Sceererrseeeeriieers 


wv 

Cant 

2 

— 
Tl ~ 
nnnnnnu 


] 


S38 
ao 


wo 
” 
am 
404 
_— tt 1 I OS St a os 


a ae ae at pd, be ae ae ae be 


4 


vane 
3252 
nun 


KEYWD1 


a 


QaaG 


aq 


15: 


CVCLHB DPV-11 DATA COMM, LINK TEST 
15=JUN=81 48 


MACY11 30A(1052) 
CROSS REFERENCE TABLE =~ USER S 


8655 
8612* 





16-JUN-81" 
4118 4138 
6688 6703 
7057 7064 
4204 4324 
5439 5520 
8555 8568 
7325 

8658 8680 
8617 8619 
5509" 55114 
87014 87444 
89214 

5970* 7160 
7328* 7331s 


8638 


55134 


87724 


7162 
7335* 


13 
10: 1 + Te 15-9 


4233 4247 
6735 6758 
8907 8923 
4371 4462 
5983 6070 
8961 8987 
8641 8659 
55154 55174 
164 7166 
7345 7359 


SEQ 0169 

4263 5118 5167 5179 
6898 6925 6943 6957 
8946 9003 9025 9038 
4487 5067 5131 5156 
6848 6884 8026 8146 
8674 8681 

55344 55364 55438 5545# 
7169 7173 7178 7180 
7401* 7415* 7477 


7412* 





a - a Se 


B 14 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052)_ 16=JUN-81 10:00 PAGE 15-10 SEQ 0170 


CVCLHB.P11 15=JUN=81 15:48 CROSS REFERENCE TABLE == USER SYMBOLS 
LCLKEN= 000100 43094 6806: 
LGDVE 017652 57884 8240 8273 8331 8530 8661 8682 8879 
LIS = 000006 42984 7500 8092 
CIScK 032462 4763 81154 
LISCKA 032510 81174 8136 8138 
LISMOD= 000032 44354 4911 
LISP 013555 5269# 8116 
LMDLOP= 000046 44474 5051 
LNCNT 006474 47024 5855 5857* 5861*  7600* 
LOE = 040000 G 42784 
LOGCMD 017772 58104 7940 
LOGCML 017754 58 7917 
LOGCMP 017736 58024 7911 
LOGDVI 017670 57934 7607 
LOGEOP 020010 58144 80 
LOGEX 020300 5844 58814 
LOGMSC 020026 58334 
LOGRXC 017642 57854 7793 8131 
LOGRXQ 017624 57804 7776 8125 
LOGS1 020044 5773 5778 5783 5787 58394 
LOGS2 020272 5875 58794 
LOGSS 020076 5791 5800 5805 5809 5813 5817 5836 58484 
LOGSS 020152 5856 58604 
LOGSS 020176 5850 5852 58634 
LOGTXC 5775# ©7834 
LOGTXQ 017570 5770# 7785 8078 
LOGUNT 006552 47344 6837* 6839* 6840 6843 
LOOPS 003114 6534 6388 
LOT = 000010 G 42784 
LPO 013437 4653 5242 6387 
LPO0O 013440 52434 6384 
LP1 013447 4654 52444 
LP2 013460 4655 52454 
LP3 013466 4656 52464 
LP4 013501 4657 52474 
L$ACP 002110 G 41164 
L$APT 002036 G 41164 
L$AU 025 G 4116 70174 
T 002070 G 41164 
L$AUTO 025032 G 4116 69234 
L$CCP 002106 G 41164 
LSCLEA 025034 G 4116 69414 
L$CO 002C32 G 41164 
LSDEPO 002011 G 41164 
LSDESC 011504 G 4116 51764 
L$DESP 002076 G 41164 
LSDEVP 002 G 41164 
L$DISP 002124 G 4116 41364 
L$DLY 002116 G 41164 
L$DTP 002040 G 41164 
LSDTYP 002034 G 41164 
L$DU 025056 G 4116 69804 
L$DUT 002072 G 41164 
L$DVTY 011474 G 4116 51654 
LSEF 002052 G 41164 
LSENVI 002044 G 41164 












C 14 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN=-81 10:00 PAGE 15-11 SEQ 0171 
CVCLHB.P11 15=JUN=81 15:48 CROSS REFERENCE TABLE == USER SYMBOLS 


LSETP 002102 G 41164 


LSEXP1 002046 G 41164 
LSEXP4 002064 G 41164 
LSEXPS 002 G 41164 
L$HARD 035346 G 4116 89444 
LSHIME 002120 G 41164 
LSHPCP 002016 G 41164 
LSHPTP 002022 G 41164 
L 002130 G 4116 41544 
LSICP_ 002104 G 41164 
LSINIT 024172 G 4116 67564 
L 002026 G 41164 
LSLAST 035624 G 4116 90594 
L$LOAD 002100 G 41164 
LSLUN 002074 G 41164 
LSMREV 002050 G 41164 
002 G 41164 
L$PRIO 002042 G 41164 
LSPROT 024164 G 4116 67274 
L$PRT 0C2112 G 41164 
LSREPP 002062 G 41164 
L$REV 002010 G 41164 
LSRPT 024156 G 4116 66864 
L$SPC_ 002056 G 41164 
L$SPCP 002020 G 41164 
LSSPTP 002024 G 41164 
L$STA_ 002030 G 41164 
LSTEST 002114 G 41164 
L$TIML 002014 G 41164 
L$UNIT 002012 G 41164 6840 
4154 42004 
55054 
55094 
55134 
55174 
55364 
55454 5547 
57314 
67184 
68 
6 
69 


89214 


7598* 7971 7980* gt 
* 
7122* 7128 aby 7393 7494* 7513 7555* 7557 7559* 7561* 7563+ 


D 14 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052)_ 16=JUN-81 10:00 PAGE 15-12 SEQ 0172 
CVCLHB.P11 15=JUN-81 15:48 CROSS REFERENCE TABLE == USER SYMBOLS 


7540 8613 


8373* 8374* &8377* 8378* o6<3 ae 
7121* 7127 7392 7489* 492% 7497* 7500* 7503* 7506*  7509* 7523 
7803 7819 7836 8092* 8139" 8258 


8508* 8515*  8760*  8767* 8816* 
4677 4678 6323 7194 7224 
8507* 8513* 8757 8759* 8766*  8815* 


7105* 7117% 7370* 7438% 7457* 7459% 7461* 7463* 7465* 7467* 7470* 


7118 7371 7468 


7517 7520 7546 





CVCLHB.P11 

NOD107 010702 
NOD11_ 007772 
NOD110 010716 
NOD111 010722 
NOD112 010726 
NOD113 010742 
NOD114 010746 
NOD115 010764 
NOD116 010770 
NOD117° 011004 
NOD12 010004 
NOD120 011010 
NOD121 011024 
NOD122 011030 
NOD123 011044 
NOD124 011050 
NOD125 011 

NOD126 011070 
NOD127 011104 
NOD13_ 010010 
NOD130 011110 
NOD131 011130 
NOD132 011134 
NOD133 011140 
NOD134 011144 
NOD135 011150 
NOD136 011154 
NOD137 011160 
NOD14 010024 
NOD140 011164 
NOD141 011166 
NOD142 011172 
NOD143 011176 
NOD144 011212 
NOD145 011216 
NOD146 011232 
NOD147 011236 
NOD15 010030 
NOD150 011242 
NOD151 011246 
NOD152 011252 
NOD153 011256 
NOD154 011300 
NOD155 011304 
NOD156 011320 
NOD157 011324 
NOD16 010044 
NOD160 011346 
NOD161 011352 
NOD162. 011374 
NOD163 011400 
NOD164 011404 
NOD165 011410 
NOD166 011414 
NOD167 020522 
NOD17 010050 


748 


14 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10: 
15=JUN=81 15 


CROSS REFERENCE TABLE == USER SY 


00 PAGE 15-13 
MBOL S 





SEQ 0173 


F 14 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGF 15-14 . SEQ 0174 


CVCLHB.P11 15-JUN=81 15:48 CROSS REFERENCE TABLE -- USER SYMBOLS 
NOD170 020526 59314 
NOD171 020532 59324 
NOD172 020534 59334 
NOD173 020550 59344 
NOD174 020552 59354 
NOD175 020566 
NOD176 020570 59374 
NQD177 020602 59384 
c 007716 48804 
NOD20 010054 48944 
NOD200 020604 59394 
NOD201 020606 59404 
NOD21 01 48954 
NOD22 010072 8 
NOD23 010104 48978 
NOD24 010110 48984 
NOD25 010112 49024 
NOD26 010116 49034 
NOD27 010132 49044 
NOD3 007720 48814 
NOD30 010136 49054 
NOD31 010154 
NOD32 010160 49074 
NOD33 010176 49084 
NOD34 010202 49094 
NOD35 010220 49104 
010224 49114 
NOD37 010242 49124 
NOD4 007734 48824 
NOD4O0 010246 49134 
NOD41 010272 49144 
NOD42 010276 49154 
NOD43 010302 49164 
NOD44 010320 49174 
NOD45 010324 49184 
NOD46 010336 49198 
NOD47 010342 49234 
NOD5 7736 48834 
NOD5O 010346 49244 
NOD51 010370 49254 
NODS2 010372 49264 
NOD53 019416 49274 
NODS4 010420 4932# 
NOD55 010424 49334 
NOD56 010442 49344 
NODS7 010446 4935# 
007752 48844 
010466 49364 
NOD61 010472 49394 
NOD62 010476 49404 
NOD63 010502 49414 
010506 4942# 
NOD65 010512 49434 
NOD66 010516 4944ma 
NOD67 10522 49454 


0 
NOD 7 007754 48854 





—_—- —_—__:- - ——-_ -————_ - ——- — — —-— --- — 


6 16 . 
| CVCLHB DPV=11 DATA comm, LINK TEST MACY11 30A(1052) 16=JUN=81 10:00 PAGE 15-15 SEQ 0175 


(CVCLHB.P11 = 15=JUN=81 15:48 CROSS REFERENCE TABLE <= USER SYMBOLS 
| woo70 010526 49464 
|NOD71 010532 49494 
NOD72 010536 4950# 
NOD73 010542 495148 
NOD74 010554 4952 
NOD75 010560 49534 
NOD76 010574 4954 
NOD 77 01 49644 
NONE = 000000 4300# 
NOTNUF= 000050 4449# 4889 4892 4893 4903 4942 4944 4950 5024 
NULEVT 015201 53374 ©5996 
NULL = 44094 
= 14 44214 5032 
N10$ 007712 4878 48794 
N100$ 010342 4892 4895 49234 
N102$ 010346 49244 
N104$ 010372 49264 
N110$ 010420 4857  4932# 
N111$ 010424 49334 
N112$ 010446 4933 4935# 
N114$ 010536 4949 49504 
N115$ 010532 4906 4908 4910 4912 4914 4917 4919 49494 4954 4965 4967 4988 5048 
5050 5052 5054 5059 

N116$ 010554 4951 4952 
N117$ 010600 4952 4953 49644 
N118$ 010622 4964 49664 
N120$ 010722 4934 4936 4994# 
N121$ 011166 4998 5000 5002 5004 5006 5008 5010 5016 5023# 5033 
N122$ 011216 5025  5027# 
N123$ 011172 5023. 50 24a 
N125$ 011414 4942 4944 4946 4950 5012 5026 5064# 
N126$ 011236 5026 5028 50314 
N130$ 2 4966 49834 
N131$ 010702 4987 4990# 
N132$ 0662 4983 49874 
N140$ 011252 991 0364 
N141$ 011256 5047# 
N142$ 1304 50494 
N143$ 011324 5049 50514 
N144$ 011352 5051 50534 
N150$ 011400 4984 50574 
N20$ 019050 4891 48934 

$ 010072 4894 48964 
N30$ 010110 4893 4896 48984 4902 4903 4904 4915 4918 4923 4926 4932 4935 4941 

4943 4945 4990 4994 5014 5027 5031 5032 5036 5053 5057 5058 
010030 4889 48914 

N42$ 007720 4879 48814 
NG 3S 7736 4881 48834 
N4S$ 007754 4883 48854 
N45$ 007772 4885 48874 
N46$ 010010 4887 48894 
N5O$ 010472 4890 4939# 
N51$ 010476 4939 49404 
N52$ 010502 4940 49414 
N60$ 010726 49978 


N61$ 010746 4997 49994 





ee ee ee ee ee ee ee 
H 14 

| CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052)_ 16=JUN=81 10:00 PAGE 15-16 

CVCLHB.P11 15=JUN=81 15:48 CROSS REFERENCE TABLE == USER SYMBOLS 


N62$ 010770 6 50014 
N63$ 011010 5001 50034 
011030 5003 50054 
N65$ 011050 5005 50074 
N66$ 011070 5007 50094 
NO7$ 017110 5009 50114 
N68$ 011134 5011 50144 
N70$ 011140 50154 5019 
N71$ 011150 5015 50174 
N72$ 011154 5017 50184 
N73$ 011164 5018 50204 
N80$ 010112 4888 49024 
N81$ 010116 49034 
N82$ 010160 4905 49074 
N83$ 010202 4907 49094 
$ 010224 4909 49114 
N85$ 010246 4911 49134 
N86$ 010276 4913 49154 
N87$ 010324 4916 49184 
OFSET 006526 47198 5504 7920* 7933* 
OPBFPT 002514 4579# 8134 
002520 $339 45804 7448 8062 8066 8068 8074 8075 
OPCNT 002166 45354 7446* 8072* 8076 8077 
OPEND 002642 45814 8064 
RMM 013566 52704 8066 
OPRMSG= 000015 44224 5014 
OPTYP 011436 50934  6877* 
OPVAR 006476 47034 7595* 8003 8334* 
OTINT = 000002 43654 
OUTVEC 011432 50914  6874* 6875* 6893 
O$SAPTS= 000000 40304 4116 
= 000001 40304 40884 4116 
= 000001 40304 40884 4116 
O$BGNS= 000000 40304 4116 
O$DU = 000001 40304 40884 4116 
OSERRT= 000000 40304 4116 
O$SGNSW= 000000 40304 4116 
O$POIN= 000001 40304 40884 4116 
O$SE TU= 40304 4116 9059 
PAD = 091000 43884 8303 8502 8751 8769 8814 
PARAM 006570 4745 5851 7124* 7130 7395 7511" 7522s 
7794 7 7848 7893 8061* 8115* 8613 
PAS = 000002 42948 7492 7523 7819 7836 
PASC = 000042 44434 5058 
PASMOD= 30 44334 4907 
PCADD 554 47354 
PCK 013530 52514 6397 
PCLKCT= 600 43114 6813 
PCLKEN= 111 43104 6815 
PC 014352 53134 
PCSAR 011420 50844 6864* 6865*  8281* 
PEC 013540 52534 6401 
PLCK 030776 4759 76854 
PLCK2 030776 76864 
PLCKS 031012 76884 


8087 


7S27* 


8089 


7545* 


8117 


7548* 


8118 


7578 


SEQ 0176 


8135 


7660* 


ao nn ee — 


| CVCLHB DPV=11 DATA COMM 


 CVCLHB.P11 15=JUN-81 15:48 

PMS 013547 52554 6422 

PNCK 013526 5250" 6400 

PNEC 013536 5252H © 6404 

PNMS 013545 52544 6425 

PNST 013515 52484 63 

PNT = 001000 G 4278M 

PRI = 002000 G 42784 

PRIOO = G 42784 6895 

PRIO = 0G 42788 

PRIO2 = 000100 G 4278H 

PRIO3 = 000140 G 42788 

PRIO4 = 000200 G 42784 6892 6893 

PRIOS = 000240 G 4278H 

PRI06 = 000300 G 42784 

PRIO7 = 000340 G 4116 . 42784 6952 

PRNT = 000055 44544 4883 7164 733i 

PROTO = 44424 
8004 
7099 7192 
7340 7350 
7148* 
7146% 


7144* 7155 
6589 6590* 
6559* 6566 
7147* 

6488 

7716 7767 
7777 7822 
8755 8814 


7 
6824 68284 
8320 8322 





8329 


7363 


6571* 
7336* 
6596* 
6602 


7821 
7838 
7517s 


8692 


I 14 
LINK TEST MACY11 30A(1052)_ 16=JUN=81 10:00 PAGE 15-17 
4 CROSS REFERENCE TABLE == USER SYMBOLS 


7587 


6609* 
7344* 
6598* 


7828 
7847 
7520 


8693 


7143* 
7358* 
6604* 


7839 
8079 
7528* 


7151 
7406* 
7399 


8121 
8091 
7546 


7430* 
7485* 
7405 


8415 
8303 
7549* 


7479* 
7493* 
7427 


8418 
8309 


SEQ 0177 


7526* 
7512* 
7432 


8541 
8500 


-— SE ee 


14 
| CVCLHB DPV-11 DATA - LINK TEST MACY11 30A(1052) 16-JUN-81" 10: ~ -— 15-18 


| CVCLHB.P11 15=JUN“81 15:48 CROSS REFERENCE TABLE -- USER SYMB 
RHDMSG 002656 460464 8429 8805 
RHLPEN 003046 46344 5959 
RHLPTB 003036 46304 5957 
RHLPO 013034 52204 8 
RHLP1 013072 4630 52214 
RHLP2 013114 4631 52228 
RHLP3 013147 4632 52234 
RHLP4 013200 4633 5224m 
RI = 040000 44834 4800 
RINTEN= 000100 45004 8431 8698 8809 
RMDLOP= 000047 44484 5053 
RMSGCC 011462 51134 8423* 8430*  8651*  8668*  8692*  8806* 
RMSGPT 011460 51124 8422% 8429% 8646 8648*  8669*  8691* 8805 
RNODE 011472 5117 6878* 7603 8282 8419 8504 
RNODM 035514 8977 89994 
RPASS 006572 47534 5798 7123x 7129 7135 7337" 7394 7552* 8008 8010+ 
RPEXT = 000002 44604 5921 5935 5965 | 
RPHLP = 000001 44594 5931 5933 61 
RPLOG = 000003 44614 5937 5970 
RPT 020776 59994 6027 6034 6045 6051 6058 6066 6089 
RPTAA 021046 60144 
RPTDCK 021512 4847 60614 
RPTDDE 436 4850 60544 
RPTDER 021222 4845 60294 
RPTDLE 021512 4849 60604 
RPTDSP 007650 48414 6020 
RPTDVI 021316 4846 60364 
RPTEOP 362 4851 60464 
RPT™MSB 021666 6026 6085 6088 61014 
RPTMSC 021566 4848 60824 
RPTMSE 021652 60894 
RPTTXQ 021150 4841 4842 4843 4844 60224 
RPTO 021042 5995 6006 6010 60134 
RPT1 021030 6003 6 
RSTARY= C02000 45024 8638 8674 
RTS = 44824 4799 8 8903 
= 44134 4887 7166 7335 
RXACT = 000 45034 
RXBUF 004144 46744 7611 
RXxC = 43434 5849 


8238 8262* 8271 8278 8373 8431* 8528 8612 


8675 8694 87004 


8421 8687 8689 
7714 7897 





8698* 


SEQ 0178 


8809* 


SS 





K 14 
CVCLHB DPV=11 DATA COMM, LINK TEST MACY11 30A(1052) 16-JUN-81" 10:00 PAGE 15-19 SEQ 0179 
CVCLHB.P11 15=JUN=81 15:48 CROSS REFERENCE TABLE <= USER SYMBOLS 
RXON2 030704 76374 
RXPTR 006434 46834 7101* 7589* 7612 7637 7688 7715 7802 7895 
RxQ = 000004 43424 7 
R10$ 020526 5930 59314 
R11$ 020534 5931 
1 020552 5933 59354 
R125$ 59404 
R13% 020570 5935 59374 
R308 04 5937 59394 
SCM 016275 53834 5803 
SCMD 016330 53864 5811 
SCML 016317 53854 5807 
SDVE 016264 53824 5789 
SOvVI 016306 53844 5794 
SEOP 016341 53874 5815 
SETET = 000060 44574 5011 7160 7482 
SETEXP= 000010 44174 6933 7182 7412 7477 
SE TTRN= 11 44184 4935 7415 
SHF O 014211 53034 63 
SHF 1 014247 53104 6428 
SHMSG 013232 52264 7388 
= 000002 44114 6894 7180 7318 7345 7359 
SHTAB 003066 46414 7379 7385 
SHTEND 003075 46424 7382 
SHTYPO 013266 4636 52274 
SHTYP1 013275 4636 52284 
SHTYP2 013302 4636 52294 
SHTYP3 013307 4636 
SHTYP4 013314 4636 52314 
SHTYPS 013322 4636 52324 
SHTYP6 013327 4636 52334 
SHTYP7 013335 4636 52344 
SHTYTB 3046 46364 7388 
SHWOP 022564 6043 63794 7131 7396 
SIZE = 000012 44194 5025 7419 7425 
SMSC 016352 53964 5834 
= 0 44844 4801 
SRxQ 016253 53814 5781 
504 47064 6148 7399* 
START 024262 6789 67 
STATB = 000001 43154 5851 6394 7534 
STATUS= 009016 44234 
STXC 016242 53804 5776 
STxXQ 016231 3794 §771 
SVCGBL= 40304 40394 116 4136 4154 5165 5176 5503 5507 5511 5515 5534 5543 
5707 6686 727 6756 6923 6941 6980 7017 8611 8744 8944 90594 
SVCINS= 000001 40304 40364 116 4136 4154 5165 5176 504 5505 5508 5509 5512 5513 
535 5536 5544 5545 5547 5731 5859 5862 5899 5 5913 
996 6014 6019 6025 6032 6033 6049 6057 
150 6154 6156 6196 63 6428 6570 6608 6718 6785 6788 
6792 6793 6795 6 6803 6809 10 8 6819 
43 6844 6880 6892 6893 6895 6896 6912 6932 6952 6953 
699 7007 7028 7 7089 7126 7133 34 7137 7145 7153 
7187 7196 7216 7226 7322 7388 7454 7525 7569 75 
7939 7979 8037 8116 8134 8232 8242 8275 8277 8311 


CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81- 10: 00 = 15-20 SEQ 0180 


CVCLHB.P11 —-15=JUN-81 15:48 CROSS REFERENCE TABLE -= USER SYMBO 
8958 8975 8976 8977 8979 9059 
SVCSUB= 000001 4030# 40384 
SVCTAG= 000001 4O30# 4040" 4200 5505 5509 5513 5517 5536 5545 5731 5905 6718 6823 
6912 6932. «6971S 7007S 7044 = 7145 = B066~S—s«B701——s«B7?72_—s=—«éiB21—s«€B8IO 
SVCTST= 000001 40304  4037# 7070 z 
SYN = 000226 45148 
SYNCC 011454 5110# 8307 8516* 8745  8748*  8817% 
SYNCW 011456 51114 7601*  7606* 8747 
S$LSYM= 010000 40304 4200" 55054 5509" 55134 5517# 55364 5545# 57314 5905# 67184 68234 6912 
69324 69714 7007H 70444 71454 8066" 87014 87724 89214  8979# 
s] 024250 6793 6 795# 
52 024324 6804 68094 
53 024374 6810 68184 
54 024442 6819  6826# 
TABEX 014017 5299" 7 7226 
TAL = 42974 7509 =: 8139 
TALCK 032242 4762 8060 8088 8090 
TALMOD= 44384 4918 
TBMT = 45064 
TCURAD 4695# 7107" 7110 7202 7207* 7366* 
TDSR 011426 5087# 6870« 6871* 8747* 8750" 8753* 8758" 8762 
TEMP 4720# 5772* 5777* 5782* 5786" 5790* 5795s 5804 5808* 5812" 5816* 5835* 5849 
5865 5866* 5867" 5868. 6153" 6154  6198%  6199% 6200 6239" 6240* 6246 6381 
6590 63954 659%" 6428 7387* 7388 7439 7440% 7444 7447 7808*  7809* 7813 
* * 
TEMP1 006532 arin 3771s 9776s 5781s 5789* 5794s 5803* 5807* 5811* 5815" 5834" 5862 6388* 
* * 
TEMP2 006534 4722# 5796* 5797 5871 6242% 6244" 6248  6389% 63 6401* : 28 ©7770* 
7780* 7791* 7797 7811* 7812 7832* 7901* 8004 8075* 8084" 8118* 8129%  8237% 
8270" 8328* 8527* 8629  8632* 8660* 8679 §876*  8899x  8900* 
TEMP3 006536 47234 = 551 5544 5798% 5872 6384* — 6387" 6390 7772e 7782" 7792 8 
78 7810 7811 7833" 7903* 7913 8005* ~ 8076x 8085* 8120* 8130*  8238* 8271 
8329" 8528% 8624* 8626 8658* 8680" 8877* _ 
TEMP4 006540 4724# 550 5535 5544 5799 5846s 5873 7910* 7919% 7924* 7925 7936 8003* 
8239*  8272e 8330" 8529% 8625» 8626  8659*  8681*  8878* 
TEMPS 006542 4725# 6422%  6425% 2 
TEOM = 45114 8750 8762 
TERR = 100000 4512# 
TIMERS 006640 4779# 5725 5729% 8290 8294 8312 8318  8519* 8522 8823 
TIMER] 006634 4777# 5719 5721" 7084" 7085  8264* 8265 8867* 8871 
TIMER2 006636 47784 5722 5724 
TIMMIN 006626 47734 5716" 5870 6828 
T 0066 4774# 5713* 5714 5717* 5869 6829» 
TIMTCK 006632 4775#@ 5710* 5712s 27-5867 Ss: 6830 
TINTEN= 000100 8308 8517 8754 8818 
= 44854 4802 8621 8623 
TOINOT 034050 8523 8535 
TOTCC 006524 47184 6190* 6191 6197% 6199 6201* 7096" 7184* 7185 7206 7213* 7214 7238 
TRA = 000001 42934 7506 ) 
TRAMOD= 000034 4437# 4916 
TRVACT 023206 6484 6495 6511 6516 6521 6524 6544 6605 6623 6644 6668 
TRVALN 024000 6473 6627 
TRVALP 023734 6472 
TRVBIF 023312 6469  6524# 
TRVBR 023302 Sole 


0 6468 6 
TRVBRC 023226 6482 65024 6522 6527 6546 6610 6625 6646 6672 \ 





M 14 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052)_ 16=JUN-81 10:00 PAGE 15-21 ‘SEQ 0181 


CVCLHB.P11 - 15=JUN-81 15:48 CROSS REFERENCE TABLE == USER SYMBOLS 

TRVDEC 023406 6475 65494 

TRVERR 023244 6466 965114 

TRVEXI 023264 64676 

TRVNMA 023426 6550 65534 

TRVNOB 023236 65074 6528 6545 6606 6624 6645 

TR 023420 6471 6552# 

TRVOCT 023420 6474 65514 

TRVSPA 023334 6470 65304 

TRVSTR 024 6476 6650# 

TSOM = 0004 4510# 8750 

TTL = 000001 43018 7138 8249 

TILL = 000010 4507# 8248 8251 

TTLLOP= 44454 5047 

TTOTCC 006460 46944 6350 7097 7184 7189  7206% 7362* 

TXACT = 45054 

TXBUF 003144 46734 6318 7107 7365 

TxC = 000002 43414 5777 

TXCSR 011424 50864 6868* 6869*  8228* 8239 8248* 8251 8272 8308* 8375 8517* 8529 8621 
8754 8818 8878 

TXENA = 000020 45084 8308 8517 8818 

TXINEX 035004 8749 8756 8761 8768 87714 

TXIN] 034650 8746 87504 

TXIN2 034712 8752 87574 

TXINS 034776 87 8769# 

TXM = 000020 43824 8289 8502 8506 8763 8765 

TXMTOT 006456 46934 6338 7113" 7191% 7193 7208 7357 7361* 7580 7662 7686 7712 

TXONLY 030736 4758 76604 

TXON2 030744 76614 

TXPTR 006436 46844 6331* 6333" 6334 6343" 6345  7100* 7111 7192* 7200* 7201 7205* 7363* 
7364 7587* 7661 7687 7713 

TxQ = 000000 5772 

TSARGC= 000001 41164 55044 5508 55124 5516# 5535 55444 S859" S862 5899% 59134 5918# 5958 
5 60144 60194 6025 60324 60334 60494 6057# 60644 60834 60864 6101# 61168 
61504 61544 61 9 2 65704 660 68264 7089% 7126 71538 71574 
rigre 7 72164 7226 7322 73884 7429 74544 7525# 75824 80374 81164 

TSCODE= 006130 5905# 68234 71454 80664 89584 89754 89764 89774 

TSERRN= 000006 4030" 79164 7930 79398 7979% 82424 8275 83334 8532# 86634 86844 88814 

TSEXCP= 000000 59054 68234 71454 80664 89754 89764 

T$FLAG= 000040 55474 6896 69554 69914 70284 71374 7176# 

TSGMAN= 000000 40304 59054 68234 71454 80664 

TSHILI= 000776 5905# 68234 71454 80664 89754 8976s 

T$LAST= 000001 40304 9059" 

T$LOLI= 000300 5905# 68234 71454 8066# 89754 89764 

TSLSYM= 010000 4030# 4200 5505 5509 5513 5517 5536 5545 5731 6718 6912 6932 6971 
7007 7044 + 8701 8772 8921 8979 

T$LTNO= 000001 9059 

TSNEST= 177777 4030# 4051# 41544 4200# 55034 S5S05# S507# S509# 5511" 5513# 5515# SS517# 5534# 
°l36" 865543 55454 57074 57314 6086 67184 6727# 67334 6756 6912" 69234 6932 
60418 69714 6980" 7007 7017# 70444 7070H 86114 87014 87444 87724 8921# 89444 

T$NSO = 000000 40514 9060 

T$NS1 = 000004 41544 4200 5503# 5505 5507# 5509 5511# 5513 5515# 5517 5534# 5536 5543# 
5545  5707# 5731 66864 6718 6727# 6733 6756# 6912 6923" 6932 6941# 6971 
6980" 7 70178 7070# 8921 89444 8979 


700 7044 
TSNS2 = 000010 86114 8701 87444 8772 





















N 14 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052)_ 16=JUN-81 10:00 PAGE 15-22 SEQ 0182 
CVCLHB.P11 15-JUN=81 15:48 CROSS REFERENCE TABLE == USER SYMBOLS 


000000 
TSSAVL= 177777 40304 
TSSEGL= 177777 40304 
000000 


UBN= . 
TSTAGL= 177777 40304 


TSTAGN= 010023 40304 41544 55034 55074 55114 55158 55344 55434 S707# 66864 6727 67564 69234 
69414 69804 70174 70704 86114 87444 89444 

TSTEMP= 000000 41364 4200 55054 5509H 55134 5517# 5536 5545# 5547# 57314 5905# 67184 67334 
68234 68964 69124 69324 69554 69714 69914 70074 70284 7044# 7137# 71454 71764 
80664 87014 8772H 89214 89584 89754 89764 89774 8979%  9060# 

TSTEST= 000001 40304 7070 9059 


TSTSTM= 177777 40304 5504 5505 5508 5509 5512 5513 5516 5517 5535 5536 5544 5545 
5859 5862 5899 5905 5913 5918 5958 5996 6014 6019 6025 6032 6033 
6049 6057 6083 6086 6101 6116 6150 6154 6156 6196 6390 6428 
6570 6718 6785 6788 6790 6792 6795 6803 6818 23 6826 
80 6892 6893 6895 68 6912 6932 6952 6953 6955 6971 7007 
7044 7089 7126 7133 7137 7145 7153 7157 7176 7187 7216 7226 
7322 3 7429 7454 7525 7569 7582 7916 7930 7939 7979 8037 
8116 8134 8232 8242 8275 8277 8311 8333 8521 8532 8663 8822 


TSTSTS= 
TSSAU = 


69804 6 7007 
89444 8979 
41544 4200 
67564 6896 6912 
tas 5505 55074 5509 55114 5513 5515# 5517 55344 5536 55434 5545 5547 
66564 6718 
57074 5731 86114 8701 87444 8772 
70704 7137 7176 8921 

G 4136 70704 

G Sete 
7800 78074 
7804 78 
7795 77998 
7806 78184 
8976 899 
40544 48784 4879 48804 48814 48824 48834 48844 48854 48874 
4890# 48914 48924 48934 48944 48954 8 48974 49024 49034 49044 49054 

4907# 4 49104 49114 49124 49134 49144 49154 49164 49174 49184 

4919% 4923 49244 49254 4927# 49324 49334 9 49354 49 49394 4 
49414 49428 49444 49454 49464 494 49504 49514 49524 49534 49544 49644 
49654 4 4967# 49834 49844 49874 49884 4 49944 49978 & 4999# 
5 50014 50024 & 50054 5 50074 5010# S5011# 5012" 
50144 5015#@ 50164 50174 50184 5019 S5020# 5023 50244 5025# 50264 5027# 
50314 5032 50334 0 5047# 504 5050@ 50514 5052# 5053# 5054#. 5057# 
aeche 50594 # 59304 59314 59328 59334 59344 5935# 9 59374 9 5939" 
40304 
4030" 
40304 







B 15 
CVCLHB DPV=11 DATA COMM. LINK TEST MACY11 30A(1052)_ 16=JUN-81 = uF PAGE 15-23 SEQ 0183 
CVCLHB.P11 15=-JUN=81 15:48 CROSS REFERENCE TABLE == USER SYMBOLS 

SPATCH 035540 
. = 035624 45804 45884 46014 46104 46154 46434 4673 46744 4675 4676  4677# 
47844 47854 48814 48854 48894 48964 49034 49054 4911 49134  4924# 
49354 49514 49534 49644 4966 49834 49904 49974 4999% 50014 50034 


S025 S5027# 505i1# 51654 52724 5547 59334 59354 6896 6955 6991 
7176 90504 


C 15 
CVCLHB DPV-11 DATA COMM. LINK TEST MACY11 30A(1052)_ 16=JUN-81 10:00 PAGE 16 ‘ SEQ 0184 
.CVCLHB.P11 15=JUN-81 15:48 CROSS REFERENCE TABLE -- MACRO NAMES 


6791 6796 7134 


5511 5515 5534 5543 


4896 4897 4898 4902 4903 4904 4905 4907 4 4 

4914 4915 4916 4917 4918 4919 4923 4924 4925 4926 4927 
4936 4939 4940 4941 4942 4943 4944 4945 6 9 4950 
4964 4965 4966 4967 4983 49 4987 4988 4990 4991 4994 





D 15 
CVCLHB DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 16=JUN-81 10:00 PAGE 16-1 SEQ 0185 
CVCLHB.P11 15-JUN=81 15:48 CROSS REFERENCE TABLE -- MACRO NAMES 


5505 5509 5513 5517 5536 5545 
6733 


6718 


5731 8772 

8921 

4278 

7939 7979 8242 8275 8333 8532 8655 8684 8881 


6955 6991 7028 7137 7176 


7145 8066 


71454 80664 


89584 
55124 55164 55354 55444 5859H 58624 5899H 59134 59184 59584 59964 
60334 60494 60574 60644 60834 60864 61014 61164 61504 61544 61564 
66084 68264 70894 71264 71534 7157# 71874 71964 72164 72264 7322# 


55094 55134 5517# 55364 55454 57314 67184 67334 6912 6932 69714 


664 
55094 55134 55174 55364 55454 57314 67184 69124 69324 69714  7007# 





E 15 
CVCLHB DPV-11 DATA COMM. LINK TEST MACY11 30A(1052)_ 16=JUN-81 ab ak PAGE 16-2 SEQ 0186 
CVCLHB.P11 15-JUN-81 15:48 CROSS REFERENCE TABLE -~ MACRO NAMES 


55134 55174 55364 55454 57314 67184 67334 69124 69324 69714 
89794 90604 

69914 70284 71374 71768 

41544 51654 55074 55114 55154 55344 55434 57074 


60334 60494 60574 60644 60834 864 61014 61164 61504 61544 
66084 66864 67274 67568 67854 67884 67904 6792 67954 
68434 68804 68924 68934 65954 68964 69124 69234 69324 69414 
70074 7017 70444 70708 70894 7126 71374 8671454 71534 
72264 73224 7429% 74544 75254 75694 75824 79304 


88684 88814 89214 89444 
67954 68034 6809 68434 68954 69524 


55134 5517# 5536 55454 573i1# 67184 67334 69124 6932 69714 


55164 55354 55444 5859% 58624 S899 59134 5918 5958"  5996# 
60494 60574 60644 60834 60864 61014 61164 6150 61544 61564 
68264 70894 71264 7153 71574 7187 71964 7216 72264 7322 


81164 
55074 55114 55154 55344 55434 5707# 66864 67274 67564 69234 
55164 55354 55444 5859# 58624 5899H 59134 59184 59584  5996# 


60494 60574 60644 60834 60864 61014 61164 6150 61544 61564 
68264 68804 68924 68934 70894 7126 7153# 7157# 71874 71964 








15 
CVCLHB DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 16-JUN-81" 10: A * some 16-3 SEQ 0187 
CVCLHB.P11 15-JUN-81 15:48 CROSS REFERENCE TABLE -=- MACRO NAM 


MSPUT1 19814 40304 55044 55084 55124 5516 55354 5544 58594 2yece 58994 59134 59184 59584 5996 


MSRNRO 19624 40304 68094 68434 

MSSETS 2032 4030H 40514 41544 55034 5507 55114 5515 55344 55434 57074 66864 6727# 67564 69234 
69414 69 70174 7070 86114 87444 89444 

MSSTAR 17334 40304 

MSSVC 19334 40304 55044 55054 5 55094 55124 55134 5516 5517 55354 55444 55454 55474 
5859" S5862# 5899% 59054 59134 59184 584 9964 60144 60194 60254 60324 60334 60494  6057# 
60644 60834 60864 61014 61164 61504 61544 61564 61964 63904 6428" 6570 66084 67184 67854 
67884 67 67924 67954 68034 68094 68184 8234 68264 68434 6880" 68924 68934 68954 
6912% 6932% 69524 69554 69714 69914 70074 70284 70444 70854 71334 7137 71454 
7153@ 7157# 71764 71878 71964 72164 264 73224 73884 7429% 74544 75254 7569 75824 7916 

7939 7979 80374 80 81164 81344 82324 8242 8275 82774 83114 8333 85214 8532 

8663 8684 88224 88624 88684 8881 89214 

M$TLAB 19294 40304 5504# 5505# 55084 55094 55124 55134 5516 5517 55354 55364 55444 55454  5859# 
58624 5899 5905# 59134 59184 59584 5996 60144 60194 60254 60324 603534 60494 6057 60644 
60834 61014 61164 61504 61544 61564 61964 63904 64284 6570# 66084 67184 67854 6 
6 6792# 67954 68034 68094 34 264 668434 8804 68924 68934 68954 68 69124 
6932H 69524 69534 69554 69714 70074 70444 7089 7126 71334 7137# 71454 71574 7176 
71874 867 72164 72264 7322 73884 7429 74544 7525 7569% 75824 79164 79304 7939  7979# 
80374 80664 81164 81344 8232 82424 82754 8277# 83114 83334 85214 85324 86844 88224 
88624 88684 88814 89214 

MSTSTL 19214 4030 55044 5505 55084 55094 55124 55134 55164 5517 55354 5536 55444 55454 58594 
58624 5899% 59054 59134 59184 59584 59964 60144 60194 60254 60324 60334 60494 60574 60644 
60834 61014 61164 61504 61544 61564 61964 63904 64284 65704 0 67184 67854 67884 
6790# 67924 67954 68034 68094 68184 68234 8264 68434 68804 68924 68934 68954 69124 
69324 69524 69534 69554 69714 7007H 70444 7089 71264 71334 71374 71454 7157#@ = 71764 
71874 «67 72164 72264 73224 73884 7429% 74544 75254 7569  7582# 1 79304 79394  7979# 
80374 80664 81164 81344 8232 8242 82754 8277# 83114 83334 85214 85324 86844 88224 
88624 88684 88814 89214 

MSWORD 19944 40304 4116 41364 55474 59054 68234 8964 69554 69914 70284 7137# 71454 71764 1 
ats 7939%  7979K 0 82424 82754 83334  8532H 86634 86844 88814 89584 89754 89764 89774 


4951 4952 4953 4954 4964 4965 4966 4967 4983 4984 4987 4988 4 
4997 4998 0 5001 5002 5003 5004 5005 5006 5007 5008 9 5010 5011 
5012 5014 5015 5016 5017 5018 5019 5020 5023 5024 5025 5026 5027 5028 5031 
5032 5033 5047 5048 5049 5050 5051 5052 5053 5054 5057 5058 5059 5 

9 5931 5932 5933 5934 5935 5936 5937 5938 5939 5940 


5930 
OPEN 11714 40304 
POINTE 11764 40304 4088 
PRINTB 1239% 40304 5504 5508 5512 551 
PRINTF 1279 4030# 5859 5862 5899 a. 


PRINTS 1319% 40304 5996 6014 6019 6025 6032 6033 6049 6057 6064 6083 6086 6101 6116 


| G 15 
CVCLHB DPV-11 DATA 't sin” TEST MACY11 30A(1052) 16=JUN-81 10: Hao I ——" 16-4 SEQ 0188 
CVCLHB.P11 15=JUN-81 15:48 CROSS REFERENCE TABLE -- MACRO NAM 





READBU 13994 40308 6818 
READEF 14034 40304 6788 6790 6792 6795 


RFLAGS 1408% 40304 
SETPRI 14138 4030# 6895 6952 

SETVEC 1418%  4030# 6880 6892 6893 " 
SLASH 14244 40304 

STARS 14384 40304 

SVC 1452# 4029% 4030 

XFER 1610" 4030# 5547 68968 69554 69914 7028 71374 7176# 

XFERF  1616#  4030# 

XFERT 16208 4030 


- ABS. 035624 000 


ERRORS DETECTED: 0 


CVCLHB/I EOL peer 1 


RUN-TIME: 22 28 3. SEC 
RUN-TIME RATIO: 71/54=1.3 
CORE USED: 19K (37 PAGES) 


DOCUMENT PAGES: 188 





